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Lokführer sind aus der Mode 
gekommen. Traumberufe gibt 
es kaum. Meinungsforscher 
haben herausgefunden, daß 
die meisten Mädchen mit Kos- 
metik, Kleidung und Kostbar- 
keiten zu tun haben wollen, 
während die Männer am Com- 
puter sitzen. Das schafft Zu- 
kunftschancen: Aus Hobby 
wird Beruf. Doktor Erich Häu- 
Ber, Chef des Deutschen Pa- 
tentamtes: „Für die jüngere 
Generation sind Computer et- 
was Selbstverständliches. Zur 
älteren Generation gehören all 
die, die nicht einmal eine Digi- 


talarmbanduhr bedienen kön- 
nen.“ Tatsächlich ist der Sie- ® 
geszug des Computers in den © 
Hobby, Freizeit, © 
Sport, Unternehmen und Be- 7 
Eine # 
Umsatzzuwachsrate von 20% ist ' 
etwas wovon andere Branchen 


Bereichen 


hörden ungebrochen. 


nur träumen können. 


An qualifiziertem Fachpersonal 3 
dagegen herrscht akuter Man- 


gel. Es fehlen über dreißigtau- 
send Computerexperten und 
die Tendenz ist steigend. An 


Universitäten und Fachhoch- # 
schulen wird hingegen, so muß ! 


es scheinen, immer noch ge- 
träumt: Zusammen mit anderen 
privaten Bildungsträgern wer- 
den jährlich lediglich vier- 
tausend EDV-Spezialisten auf 
den Arbeitsmarkt losgelassen. 
Also liegt in der Fortbildung 
am Computer eine sichere 
Chance, einen interessanten 
Arbeitsplatz mıt Zukunft zu be- 
kommen. Eine Million deut- 
sche Computer-Hobbyisten ha- 
ben dies offenbar erkannt und 
sich den C64 gekauft. „Das 
muß gefeiert werden“, meinten 


7% 


hat 


u 


ME 
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Aus der Redaktiem 


rauıme_ 


Winfried Hoffmann und Harald 
Speyer von Commodore. Ein 
Bericht dazu steht auf Seite 39. 
Einer der deutlich bewies, daß 
er in keiner Traumwelt lebt, 
war Dr. Achim Becker (Düssel- 
dorf). Auf die Frage von Fern- 
sehmoderatorin Barbara Dieck- 
mann: „Gibt es eigentlich eine 
Anwendung, für die Sie kein 
Programm entwickeln kön- 
nen?“ antwortete der Compu- 
ter-Tausendsassa: „Es gibt Si- 
cherlich eine Vielzahl von An- 
wendungen“. Kapiert? 

Eine Vielzahl von „ICON'S" 
sind inzwischen in die Hände 
unserer Computeraufsteiger 
gelangt. RUN-Leser Simon 
Schmitt: „Im Kaufhof war nach 
zwei Tagen kein ICON mehr zu 
bekommen.“ Das macht nichts, 
denn man kann ICON direkt im 
Verlag bestellen. Aufwachen 
heißt es jetzt für diejenigen, die 
sich noch an unserem großen 
Programmier- und Fantasie- 
Wettbewerb beteiligen wollen. 
Einsendeschluß ist am 9. Fe- 
bruar. Bis dahin darf von 101 
Preisen geträumt werden. 
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Hobby und 
Computer 


Tarzan springt Jonny Weißmüllers gefürchteter 


Tarzanschrei ertönt jetzt nicht 
mehr auf der Leinwand, sondern 
im C64. Mit „Tarzan“ landet Mar- 
tech einen Hit für Liebhaber der 
Hüpf- und Springspiele. Der 
Held im Lendenschurz muß Jane 
befreien. Sie wurde von einem 
Stammeshäuptling gefangen. 
Von der Grafik und vom Sound 
ansprechend gemacht, ver- 
spricht dieses Spiel langanhal- 
tenden Spielspaß. 

Seite 136 


Heimcomputer sind für viele 
Hobbybereiche eine interessan- 
te Ergänzung. Sie steuern Mo- 
delleisenbahnen, verwalten gro- 
Be Briefmarkensammlungen und 
unterstützen die Kreativität von 
Musikern und Grafikern. Unsere 
Beiträge zeigen, wie man den 
C64 zum Panzerfahrer umfunk- 
tioniert und was Computer und 
Sport miteinander zu tun haben. 
Seite 44 


Self-Developnent 
Bonus: 2088 


Endlich gibt es eine auf deutsche 
Verhältnisse zugeschnittene 
Amiga-Version. Neben Tastatur 
und einigen „Äußerlichkeiten“ 
hat es noch weitere Veränderun- 
oen bei Hardware und Software 
gegeben. Die Systemsoftware 
wurde mit weiteren Utilities ver- 
bessert und schneller gemacht. 
Oben drauf gibt es noch „Mind- 
walker“, ein Spiel mit hervorra- 
gender Grafik und tollem Sound 
Seite 64 


Der deutsche 
Amiga 


GRÖPROWAZ II 


Bis zum Einsendeschluß sind es 
nur noch wenige Tage. Jetzt heißt 
es in die Hände spucken und ran 
an die Computer. Eine Verlänge- 
rung des Einsendeschluß wird 
es dieses Mal nicht geben, dafür 
tolle Preise. Nicht alle sind auf 
dem Foto abgebildet. Es sind 
einfach zu viele. Zusätzlich tref- 
fen täglich weitere Lieferungen 
in der Redaktion ein. Gestern ein 
3000-Mark-Typenraddrucker 

von Brother. 

Seite 6 
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Wettbewerb 


Es ist wieder soweit. 
Alle Programmierer 
sind aufgerufen, sich an 
unserem Programmier- 
wettbewerb zu beteili- 
gen. 101 tolle Preise 
warten auf ihre Gewin- 
ner. Die Chancen sind 
größer denn je. 


Aufgrund zahlreicher Anfragen 
verlängern wir den Einsende- 
schluß um einen Monat, vom 9. 1. 
1987 auf den 9. 2. 1987. 


Dieses Jahr gibt es nur eine Ver- 
längerung, also RUN an den Com- 
puter. Gute Ideen sind gefragt. 
Der Phantasie sind (fast) keine 
Grenzen gesetzt. Damit jeder glei- 
che Gewinnchancen hat, gibt es 
vier Kategorien: 


1.) C64 

2.) C128 

3.) C16/116/Plus 
4.) Amiga 


Übrigens, je besser die Pro- 
grammidee ist und um so ausführ- 
licher die Dokumentation ausfällt, 
desto besser sind die Gewinn- 
chancen. Das hundertste Master- 
mind- oder Biorhythmuspro- 
gramm hat keine Gewinnchancen. 
Erstmalig können sich Hardware- 
bastler am Wettbewerb beteili- 
gen. Damit bis zum Einsende- 
schluß alles reibungslos verläuft, 
bitten wir alle Teilnehmer, die 
Teilnahmebedingungen nicht nur 
zu lesen. Zapfenstreich ist am 
9.2.87. 


Die Einsendungen sind an 


CW-Publikationen 
Redaktion RUN 
„Programmierwettbewerb“ 
Postfach 400 429 

8000 München 40 


zu richten. Viel Spaß beim Pro- 
grammieren wünscht die RUN-Re- 
daktion. 


Für Ihre Einsendung bitte unbe- 
dingt den Teilnahme-Coupon auf 
Seite 8 verwenden. 
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RUN ruft zum li 


a) Teilnahme-Coupon ausgefüllt mit 
dem Programm einsenden. Fehlt der 
Coupon, (auf die Unterschrift kommt es 
an) müssen wir den Beitrag komplett zu- 
rückgeben. 


b) Eine ausführliche Programmbe- 
schreibung möglichst als Ausdruck und 
als Vizawrite-File auf Diskette einrei- 
chen. Willkommen sind uns auch IBM- 
PC-Textfiles. Falls ein Drucker zur Ver- 
fügung steht, bitte den Text mit 35 
Zeichen Breite, linksbündig und mit dop- 
peltem Zeilenabstand ausdrucken. 


c) Bei Programmeinsendungen bitte 
eine Diskette, oder falls nicht vorhan- 
den, eine Kassette beifügen. Fehlt ein 
Datenträger, müssen wir sämtliche Un- 
terlagen zurückschicken. Sollten wir Ihr 
Programm nicht veröffentlichen, wird 
der Datenträger mit den Unterlagen 
nach dem Einsendeschluß zurückge- 
schickt. 


d) Handelt es sich um eine Hardwareba- 
stelei, brauchen wir einen funktionsfähi- 


= 


gen Aufbau. Nach dem Test geht alles 
zurück an den Absender. Bei Basteleien 
gilt: Ausführliche Beschreibung beifü- 
gen, sämtliche Programme zum Betrieb 
auf Diskette und eine Anleitung, die 
auch für weniger Fortgeschrittene ver- 
ständlich sein muß. Zusätzlich wollen wir 
eine Bauteileliste mit Bezugsquellen für 
ausgefallene Teile, ein Platinenlayout 
und einen Schaltplan. 


e) Programme dürfen keinenfalls mit ei- 
nem Kopier- oder Listschutz versehen 
sein (sie schützen den Einsender auto- 
matisch vor der Gewinnchance)! 


f) Sollte Ihr Programm nicht zu den Sie- 
gern gehören, ist dies noch längst kein 
Grund zu kapitulieren. Vielleicht eignet 
es sich für eine anderweitige Verwen- 
dung. 


g) Die Bewertung der Einsendungen 
wird nach dem Einsendeschluß vorge- 
nommen. Vorabauskünfte über die Pla- 
zierung sind folglich unmöglich. 


enWeitbewerh 
J0WAZ II 


FaRsıchT — 


Kartons, Kisten und Pakete für den GRÖPROWAZ II stapeln sich in der 
Redaktion. Unsere Räume platzen aus allen Nähten und täglich treffen 
weitere Preise ein. Die Unterstützung der Firmen ist riesengroß. 


Über die bisher in der Redaktion eingetroffenen Preise informieren wir Sie 
auf der nächsten Seite. 
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Wettbewerb 


Programmierer und Bastler aufgepaßt: 
Einsendeschluß für den GRÖPROWAZ II 
ist am 9.2.1987. Jetzt heißt es ran an Compu- 
ter oder Lötkolben. Denn wer noch an un- 
serem Ideen-Wettbewerb teilnehmen will, 
muß sich sputen. Eine weitere Verlänge- 
rung wird es nicht geben. Um Ihren Mund 
noch wässriger zu machen, hier die Liste 
der Preise, die bisher in der Redaktion ein- 
getroffen sind. Und natürlich bekommen 
die Preisträger bei Veröffentlichung auch 
noch Honorar! 


Zur Verfügung gestellte 
Preise 


e 20 Murder on the Mississippi, Activision 

Deutschland GmbH, Karlstr. 26, 2000 Ham- 

burg 76 

e 2 Faktura Plus, Binkert Software, Estel- 

bergerweg 2, 7892 Albbruck-Birndorf 

e 5 Diane Programme, 5 Hans Program- 

me, Computer Video Art, Schwedlerstr. 

37, 8520 Erlangen 

e 1512-K-Speichererweiterung + Paral- 

lelbus + Einbau, CTJ A Junges, Spiek- 

kern 11, 5600 Wuppertal 

| Basic-Compiler Eivcat, Digimat 

Be Janak, Arbeitergasse 48, A-1050 
ien 

e 10 Disketten, Delta Soft, Miraustr. 131, 

1000 Berlin 27 


Programmier-Wettbewerb 


Am Wettbewerb teilnehmen kann nur, wer diesen Coupon 
ausgefüllt zusammen mit seinem Beitrag einschickt. 


Name: 
Vorname: 
Straße: 
PLZ/Ort: 
Land: 

Telefon: 
Geburtsdatum: 
Meine Einsendung ist für den: 


0 C64 OD C128 DI C16/116/Plus4 DJ) Amiga 


Programmname: 
Inhalt der Sendung: 
U Listing 


U] Programmbeschreibung auf Diskette 


DO Diskette 


U Erklärungen zum Directory der Diskette 


U Kassette 
U Hardwarebastelei 
U Sonstiges: 


Wenn mein Programm veröffentlicht wird, bin ich damit ein- 
verstanden, daß die Veröffentlichungsrechte an RUN (Verlag 
CW-Publikationen) übergehen. Weiterhin bestätige ich mit 
meiner Unterschrift, daß mein Programm frei von Rechten 


Dritter ist. 
Unterschrift: 


Bei Minderjährigen (unter 18 Jahren) bitte die Unterschrift 


eines Erziehungsberechtigten: 
Unterschrift: 
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e 101 Eintrittskarten für Flohtronika, Deut- 
scher Amateur-Radio-Club 


© 3 Joysticks mit Mikroschaltern, Dyna- 
mics Marketing GmbH, Friedensallee 35, 
2000 Hamburg 50 

e 100 Disketten, Dysan GmbH, Oskar- 
Sommer-Str. 15-17, 6000 Frankfurt 70 

© ] Baukasten mit Interface, Fischerwer- 
ke GmbH, Weinhalde 14-18, 7244 Tumlin- 
gen/Waldachtal 

© 5 Business Texter, Human Computer 
Corp., Kiefernweg 14, 2117 Tostedt 

© 3 Joysticks, Alain Krawietz, Bauerbank- 
str. 27, 5000 Köln 51 

© ] Colourspace, 1 Yaks Progress, | Viva 
Vic, Llamasoft, 49 Mount Pleasant, Tadley 
Hants, England 

e 5 Anwenderbücher C128, Mc Graw 
Hill-Book a GmbH, Lademannbo- 
gen 136, 2000 Hamburg 63 

e 3 Stempel, Lebos Druckstore, Werdoh- 
ler Str. 15, 5880 Lüdenscheid 

© | Software-Entwicklungssystem, 1 Far- 
sight „Besondere Software“, Meier-Vogt, 
Im Späten 23, CH-8906 Bonstetten 


© 10 Software-Schecks, Lindenschmidt 
Versandhandel, Schulstr. 14, 4972 Löhne 

© | MT80 Drucker, Mannesmann Tally 
GmbH, Glockeraustr. 4, 7900 Ulm-Elchin- 
gen 

e 5 Kassetten, Sunshine Software, Auf 
dem Schilde 14, 5270 Gummersbach 


© | Zehnertastatur, | Maus, 1 Softwarepa- 
ket, Rushware Microhandelsgesellschaft 
mbH, An der Gümpgesbrücke 24, 4044 
Kaarst 2 


e | STX-80 Drucker, Star Micronics 
Ss Frankfurter Allee 1-3, 6236 Esch- 
orn 


e 20 Disksorter, Scheiba, Talstr. 26, 8901 
Dinkelscherben 

© | Modul, User-Soft, Dompfaffenstr. 8, 
5461 Vettelschoß 

© 2 Soundboxen, Wiesemann & Theis 
GmbH, Winchenbachstr. 3-6, 5600 Wup- 
pertal 2 

e 2 Kassetten „Fighter Pilot“, Digital Inter- 
gration, Watchmoor Road, Camberley Sur- 
rey GU153A]J GB 

e 5 Dosenleisten, Knürr AG, Schatzbogen 
29, 8000 München 82 

e 5 Turbo-Pascal Top Training mit Disket- 
te für IBM-PC, Ernst Klett Verlag, Rote- 
bühlstr. 77, 7000 Stuttgart 1 


eo 1 C64 Oszill ph, 1 ST-Oszillograph, 
Microcomputer Schumannstr. 23, 
6600 Saarbrücken 


© ] Monitor, Thomson Grand Public, Max- 
von-Lauer-Str. 27, 3005 Hemmingen 1 

e 35 Fachbücher, te-wi Verlag GmbH, 
Theo-Prosel-Weg 1, 8000 München 40 

© | Okimate 20 Drucker, Okidata GmbH, 
Hansa-Allee 187, 4000 Düsseldorf 11 

© | Superpic-Universal, Resco Electronic, 
Hessenbachstr. 35, 8900 Augsburg 1 

© | Drucker, C.Itoh Electronics GmbH, 
Roßstr. 96, 4000 Düsseldorf 30 

© 5 Mailbox-Fächer für 2 Jahre (ohne 
Grundgebühr, ohne Einrichtungsgebühr), 
Deutsche Mailbox GmbH, Blücherstr. 11, 
2000 Hamburg 50 

© 12 Diskettenboxen mit Disketten, 3M 
Deutschland GmbH, Carl-Schurz-Str. 1, 
4040 Neuss | 

© ]4 Softwareprodukte, CSJ-Computer 
Soft, ag der Tiefenrieder 27, 3000 Hanno- 
ver 

© 10 Softwareprodukte, RVS Datentech- 
nik, Gut Wildschwaige, Postfach 55, 8055 
Hallbergmoos 

e 5 Disketten „Grammatica“, A. Scholz, 
Halweg 61, 4320 Hattingen 

e 6 Spiele, 1 64-K-Speichererweiterung, 
Micro Händler, Malmedyerstr. 30, 4050 
Mönchengladbach 1 

e 5 Softwareprodukte für Atari ST, Focus 
Computer GmbH, Friesenstr. 14, 3000 Han- 
nover | 

e 3 Spiele, M.A.G.-Software, Schwarz- 
waldring 49, 7505 Ettlingen 4 

© | Joycart, Sinclair Research, Jägerweg 
10, 8012 Ottobrunn 

© 6 Joysticks, 2 Power Cartridge, Lindy- 
Elektronik GmbH, Postfach 1428, 6800 
Mannheim | 

© | Super-Assembler „EDNA", Microtron, 
Bahnhofstr. 2, CH- 2542 Pieterlein 

e | LX-90 Drucker, Epson-Deutschland 
GmbH, Zülpicher Str. 6, 4000 Düsseldorf 11 
© | Grafik-Maus, NCE Nordphon Compu- 
ter, Fliederbogen 1, 2399 Tarp 

© Spiele, Softline, Schwarzwaldstr. 8a, 
7602 Oberkirch 

© 200 Disketten, 1 Ablagebehälter, Döb- 
belin & Boeder GmbH, Wickererstr. 50, 
6093 Flörsheim am Main 

e 10 Bücher „Das Geheimnis des Schloß 
Ärend", Addison-Wesley-Verlag, Fried- 
berger Landstr. 150, 6000 Frankfurt 

© | HR35 Typenraddrucker, Brother In- 
ternational, Im Rosengarten 14, 6368 Bad 
Vilbel 

© ] CetterPro 20 Typenraddrucker, 
Qume GmbH, Schiess-Str. 55, 4000 Düssel- 
dorf 11 


Wer DestroyeT komm 
= auf den stürmischen G 


des Nordatlantik genauso 
in wie vor den 


zuhause sein W 

Korallenriffen der Südsee. 

o Realistische Darstellung der 
verschi enen 
eteidigungssituatione" 

e Sieben gefährliche Missionen 


© Spannende Action- und 
Strategieelemente 


oe 1 Spieler 
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(in Kürze auch für Atari St 


Wir wünschen Mast- 
und Schotbruch! 
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WieGcbe\wierbi 


Vier Monate machten 
die Road-Runner den 
Verkehr unsicher. Jetzt 
sind die beiden Suzukis 
wieder eingelaufen, die 
RUN-Trophy 86 ist ent- 
schieden. 


Der liebe Hubert, wie 
ihn Petra Himmels Tochter sieht 


Tag und Nacht grübelten sechs 
Abenteurer-Teams über die kniff- 
ligen Rätsel der „Herren der Zeit"- 
Trilogie. Maximale Punktzahl er- 
reichten fast alle Teams bereits in 
der ersten Runde — ein hartes 
Kopf-an-Kopf-Rennen nahm seinen 
Lauf. Nach der zweiten Runde wa- 
ren vier Teams punktegleich. Erst 
der dritte und schwierigste Teil 
führte schließlich zur Entschei- 
dung: 

Klaus Janz, unser Berliner Aben- 
teurer, - schaffte es nur bis zur 
Kommandobrücke des xarzroni- 
schen Sternenschiffs, wo er in eine 
aussichtslose Lage geriet. In Ge- 
sellschaft blauer Hyperraum- 
Schafe und eines Roboters der in 
nervtötendem Ton einen Selbst- 
zerstörungs-Countdown vor sich 
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hin summte, warf Klaus bei minus 
100 Spielpunkten das Handtuch — 
ein entscheidender Fehler, denn 
wer im Universum überleben will, 
sollte stets sein Handtuch bei sich 
behalten! 

Selbstverständlich war der liebe 
Hubert auch wieder dabei, stink- 
sauer, denn die Abenteurer hat- 
ten ihm seine heißgeliebte Zahn- 


bürste entwendet. Er bedankte 
sich hierfür mit einem lieben Ge- 
schenk: Ein tickendes Päckchen 
(das natürlich keinen Wecker ent- 
hielt). Entschärfen? Kein Pro- 
blem.... wäre da nicht das kleine 
Grußkärtchen am Paket — „Erst 
am Heiligabend öffnen!". Wegren- 
nen? Unmöglich, wenn man in ei- 
nem geklauten Sternenschiff 
durchs All schippert und außer- 
dem in einem Sessel von einem 
gutgesinnten Sicherheitsgurt ge- 
fesselt wird, der sich um keinen 
Preis öffnen läßt. Wahre Alpträu- 
me bereitete Hubert den Aben- 
teurern und veranlaßte die Bjähri- 
ge Tochter unserer Teilnehmerin 
Petra Himmel zum Entwurf eines 
grusligen Portraits. 


Redakteur Mike, der die drei Adven- 


tures entwickelt hat, überreicht Hel- 
mut seine neue Freundin 


TROPHY ’86 


Fünf Teams erreichten das Spiel- 
ende — jedoch mit -unterschiedli- 
chen Punktzahlen, da verschiede- 
ne Lösungswege möglich waren. 


Helmut Scholp: 3125 Punkte 
Thomas Schwarz: 3115 Punkte 
Petra Himmel: 3055 Punkte 
Edgarklein: 2825 Punkte 
Michael Heinrichs: 2550 Punkte 
Klaus Janz: 678 Punkte 


Sieger der RUN-Trophy ist damit 
Helmut Scholp aus Darmstadt. Er 
ging beim Lösen der Adventures 
besonders hartnäckig vor und hol- 
te sich alle möglichen Spielpunk- 
te. Abenteuerer ist er schon lange 
— er hat die meisten Infocom- 
Games gelöst und nimmt aktiv an 
Abenteuer-Rollenspielen teil. 


Nach der Preisübergabe machte 
er sich mit seinem Amiga schleu- 
nigst auf den Weg nach Würzburg 
zu einem großen Rollenspiel-Tur- 
nier. 


Pech hatte unser Münchner Aben- 
teurer, Thomas Schwarz. Er liegt 
nur 10 Punkte hinter dem Sieger. 
Trotz erheblicher Startschwierig- 
keiten und zwei Road-Runner- 
Crashs hat die RUN-Trophy uns al- 
len viel Spaß und Freude bereitet. 
Aufgepaßt — die nächste Trophy 
kommt bestimmt! 


Euroscehutz nach 
Drohung 


Mit mehrmonatiger Verspätung 
auf eine US-Initiative hin hat die 
Europäische Gemeinschaft (EG) 
jetzt einen Urheberrechtsschutz 
für Halbleiter beschlossen. Be- 
reits Anfang des Jahres hatten die 
Amerikaner eine nationale Rege- 
lung verabschiedet und die EG 
aufgefordert, ebenfalls entspre- 
chende Richtlinien zu schaffen. 
Ansonsten, so die Drohung der 
USA, werde man die nicht-ameri- 
kanischen Unternehmen von die- 
ser Regelung ausnehmen, in de- 
ren Stammländern ein entspre- 
chender Schutz für US-Gesell- 
schaften fehle. 


€Eitizen kommt 


Die japanischen Citizen Watch 
Co. beabsichtigt, in Europa ein 
Computerdrucker-Werk zu er- 
richten. Damit will das Unterneh- 
men Handelsbeschränkungen der 
Europäischen Gemeinschaft aus 
dem Weg gehen, aber auch den 
Yen-Anstieg ausgleichen. 

Derzeit prüft das Unternehmen 
Angebote aus Großbritannien, 
Frankreich und der Bundesrepu- 
blik Deutschland. Dabei rechnen 
sich vor allem die Briten große 
Chancen aus, den Zuschlag zu er- 
halten. So soll die Stadt Corby in 
Mittelengland von Citizen-Watch- 
Direktor Seichi Hayashi bislang 
die meisten Pluspunkte bekom- 
men haben. Unter die Lupe ge- 
nommen hat Hayashi auch das In- 
dustriegebiet der Stadt Milton 
Keynes nördlich von London und 
weitere Orte in Wales, Schottland 
und Nordirland, Großbritannien. 
Es verlautete aus dem Unterneh- 
men, England sei deshalb sehr in- 
teressant, weil die britische Regie- 
rung mit Investitionsanreizen nicht 
geize. Dennoch habe man sich bis- 
her noch für keinen Standort ent- 
schieden. 

Derzeit forciert Citizen beson- 
ders die Herstellung von Compu- 
terdruckern. So soll die Produk- 
tion in diesem Jahr auf das Dreifa- 
che des vorangegangenen Jahres 
gesteigert werden. Dabei trägt 


Hetlin® 


die monatliche Produktionsrate 
derzeit rund 50000 bis 60 000 
Drucker. Wichtigster Faktor im 
Druckergeschäft ist der Export. 


Seikosha stellt seine neue Druk- 
kerserie SP 1200 vor. Es wird zwei 
Modellvarianten geben, die sich 
wie folgt unterscheiden: 

* SP 1200 AI: Epson-FX 85 und 
IBM-Grafikdrucker II kompatibel 
(lieferbar ab Dezember 1986) 

* SP 1200 VC: Anschlußfertig an 
Commodore VC 64, C 128, und C 
128 D 

Dieser 9-Nadel-Punktmatrixdruk- 
ker arbeitet mit einer Druckge- 
schwindigkeit von 120 cps im 
EDV-Druck und 25 cps im NLQ- 
Druck. Sein geringes Druckge- 
räusch von 52 dBA, ein automati- 
scher Einzelblatteinzug und -aus- 
wurf, ein optionaler Einzelblatt- 
schacht mit 150 Blatt sowie weitere 


Besonderheiten geben diesem 
lfältıge Einsatz- 

lle Home- 

lcomputer 

drucktechnisch bedienen kann. 
Die hohe Auflösung von bis zu 
1920 Punkten/Zeile gestattet ei- 
nen hochwertigen Grafikdruck. 


Der Traktor gehört wie immer bei 


indlich empfoh- 

- fspreis von DM 
799,— inkl. MwSt. setzt Seikosha 
seine Präsenz in diesem Markt- 


Naive Vorstellung 


Die Unterschriftentinte auf dem ja- 
ı SDI-Vertrag war noch 
ken und schon wurden 
n vor übertriebenen Er- 
ı laut. Der Tenor der Ex- 
ist einhellig: Japan konnte 
ht erlauben, politisch ab- 
seits zu stehen, hat aber kaum et- 
was aus SDI zu gewinnen. 
„Wer glaubt, die Teilnahme an 
SDI werde Japan besseren Zu- 
gang zu amerikanischer Technolo- 
gie verschaffen, ist sehr naiv“, 
warnte die Zeitung Ashai Evening 
News ihre Leser, „Militärtechnolo- 
gie ist fast immer streng geheim. 
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mal Wi 


® an Ihrem Computer 
® an der Peripherie 


..rufen Sie uns ungeniert — 
die Service-Profis von 
»Rat und Tat«. 


Wir warten und reparieren 
schnell - preiswert - qut 


I\ ATARI 


(x commodore 


<>Schneider 


Technischer 
Kundendienst 


51540/37033 
20017 


e, Tel 
211) 213045/222958-59 
01) 35923-27 
(0 4160 11-13 
Tel. (0761) 58801-02 
61) 36210 


7895251 


1 80 AL 
31) 36686 
1683330/29 1475 


Wiesbaden, Te 
Wilhelmshaven 04421) 42399 
Würzburg, Tel. (0931) 50289 


Februar/87 GW 11 


Neotline mm: ROUTE TEE ARTEN EEE NTLRESTELERITEZEIENE 


Und es besteht keine Garantie, 
daß Japan das Know-how aus der 
gemeinsamen Forschung mit den 
USA auch industriell nutzen darf.“ 
Den Japanern sind die jüngsten 
Streitigkeiten zwischen Intel und 
NEC sowie zwischen IBM, Hitachi 
und Fujitsu noch in unliebsamer 
Erinnerung. Es ging jedesmal um 
Urheberrechtsfragen an techni- 
schen Neuerungen. Es braucht 
wenig Phantasie, um sich neue 
Konflikte vorzustellen, die aus den 
SDI-Forschungsprojekten erwach- 
sen. Denn wie in Europa sollen ja- 
panische Firmen sich lediglich als 
Subkontraktoren an den SDI-Pro- 
jekten anhängen dürfen, in denen 
US-Firmen federführend sind. 
Werden die aus SDI-Forschungs- 
aufträgen stammenden Entwick- 
lungen in industrielle Produkte 
umgesetzt, so sind Konkurrenzsi- 
tuationen mit den amerikanischen 
Kontrahenten praktisch vorpro- 
grammmiert. 

Aber nicht nur die Japaner konn- 
ten es sich politisch kaum leisten, 
dem amerikanischen Druck auf 
SDI-Zusammenarbeit zu widerste- 
hen. Auch die Amerikaner fanden 
sich in einer Zwangslage: Die Al- 
ternative zur japanischen SDI-Teil- 
nahme bestand in der Vorstel- 
lung, das geballte Know-how von 
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Firmen wie Fujitsu, Hitachi, Mit- 
subishi, NEC, Sony und Toshiba 
könnte die Sowjetunion zur Zusam- 
menarbeit mit Japan in einem AÄnti- 
SDI-Projekt veranlassen. 


Ungescehützte 
Daten 


In Australien sind Daten noch völ- 
lig ungeschützt. Dort hat ein 
Systemprogrammierer Sicher- 
heitssysteme eines Mainframe 
umgangen, um die vertrauliche 
Lohnliste seiner Gesellschaft aus- 
zudrucken und ist ungeschoren 
davon gekommen. Unter australi- 
schem Recht habe er keine straf- 
bare Handlung begangen, erklär- 
te der mit der Untersuchung be- 
auftragte Beamte. Er schätzte, daß 
letztes Jahr in Australien rund 1000 
Fälle von unbefugtem Computer- 
zugriff aufgetreten waren. Die da- 
bei entstandenen Schäden wer- 
den mit 5 Millionen US-Dollar be- 
ziffert. 


€128 gegen Amiga 


C128-Anwendern steht eine Sen- 
sation bevor: Eine Hardware-Er- 
weiterung aus der Schweiz tunt 
die Grafikauflösung des C128 auf 
bis zu 640 mal 512 Punkte. Die 


Punktauflösung der einzelnen 
Zeichen beträgt hierbei 8 mal 8 Pi- 
xell Grundlage der Erweiterung 
ist die Entdeckung des Interlace- 
Modus auf dem C128, den man 
bislang nur auf dem Amiga reali- 
sieren konnte. Die Erweiterung 
ermöglicht komfortable Textver- 
arbeitung im DIN-A4-Format. 

Der Lieferumfang besteht aus ei- 
ner Platine die in den Rechner ein- 
gebaut wird und Software, die 
wahlweise auf Eprom oder Disk 
erhältlich ist. Lötarbeiten sind 
nicht erforderlich. Die Qualität auf 
dem Monitor entspricht der höch- 
sten Auflösung des Amigas! Preis: 
190 Mark. Informationen bei T. Gi- 
ger, Poststraße 14, CH-4500 Solo- 
thurn, Telefon: 00 41/65 22 85 56 


Apple reüssiert in 
Zürich 


Freude bei der Apple General- 
vertretung Industrade, Murren 
bei der Konkurrenz: Der Züricher 
Erziehungsrat erachtet in seinen 
Richtlinien zur Informatik an 
Volksschulen „Geräte des Typs 
Apple-Macintosh als besonders 
geeignet für den Einsatz in Schu- 
len“. Nachdem die Apple-Vertre- 
ter bis heute rund achthundert 
Mac’s an die Universität Zürich 
und an die Hochschule liefern 
konnten, wartet man nun auf die 
Bestätigungen der Züricher Schul- 
präsidenten. Von den rund 2000 
Züricher Oberstufenlehrern ha- 
ben bereits 700 Freiwillige in ihrer 
Freizeit einen 30stündigen Grund- 
kurs am Pestalozzianum Zürich be- 
sucht. Seit 1985 beschäftigt sich 
die pädagogische Abteilung der 
Erziehungsdirektion mit dem Titel 
„Alltagsinformatik* mit Schulver- 
suchen an der Oberstufe. Dazu 
stehen ihr 30 Macintosh's zur Ver- 
fügung. 40 Schulklassen nahmen 
bisher innerhalb des obligatori- 
schen Unterrichts an 24 unter- 
schiedlich gestalteten Projektwo- 
chen teil, produzierten in einer 
„Zeitungswoche" Klassenzeitun- 
gen, werteten Meinungsumfragen 
aus, klassifizierten Wanderwege 
für einen fiktiven Verkehrsverein 
in einem Bündner Ferienort, führ- 


ten Verkehrszählungen durch ® 


Elektr. 
BAUTEILE 


nd für Commodore- 
Rechner: 
6526 VIA U1, U2 25.00 
&510CPU U7 25.00 
4581 Sound-Chip U18 50.00 
6569 Video-Chip U19 80.00 
6IIAPLAU 17 18.00 
325572 21.50 
EPROMS: 
2764 250ns 7.50 
27128 250ns 7.50 
27256 250ns 12.90 


Elektronik 


ur 


RAMS: 
064 BK°B Stafikrom 890 
41256 256K1 Dnamicrom 8.90 
all 64K’A4 Dynamicram 990 
MICROCOMPUTER. 
ER CPU 9.80 
#520 2’8Bit Port 5.90 
FA mAaNHZ 11.90 
#532 WA 128Byle RAM 9.80 
TIL-ICs-Superpreise 
Fa500 0.60 
72508 0.60 
745373 1.80 
Komglettangebot im Info! - Bitte anfordem! 
Mipgagpnoe 
0 Stück-Packung pro Wert nur 2.00 
IC-FASSUNGEN 
Bow cost pro Pin 0.02 
.. pro Pin: 0. 
Horde Sie unser Elektronik-Info an. Wir ha 
Den Preise, wie sie sonst nur Großhändler ih- 
un Kunden gewähreniili 


Mur geprüfte Ware aus der Produktion 
namhafter Hersteller!! 


525-Disketten 
FfoNome 1D 10Stick } 
U No Nome 2 D 10 Stuck 10.90 


3°5-Disketten 


Bio Nome 1DD 10 Stück 30.00 


3*-Disketten 


Mcoewell CF2 10 Stück 99.00 
Disketten-Zubehör 
 Diskettenbox 13.90 


#5 80-100 5"25 Disketten mit Rouchglasabb 
Beckung und Schloß 


Diskettenbox 16.50 
#5 80-100 3"25 oder 3" Disketten mit Rauch- 
giescobdeckung und Schloß 


Aus 1 mach 2: 
Diskettenlocher 6.95 


Diskeifeniocher 9.90 
 Metollausführung 
Aufkleber für Diskettenhüllen 


Klarsichttaschen zum 
ben ar ast ouf die Diskettenhülle. Schluß mit 
Ost Unordnung in der Diskettenbox 
Preis pro 50 Stück 8. 90 


Reinigungsset 7.90 


%r 5725 Diskettenloufwerke. Unbedingt er. 
Sorderlich zur Sauberhaltung Ihres Disketten- 
iousfwerkes 


ZUBEHOR 


Amiga Laufwerk 448.00 


720 KB- 35 Di 


Atari-ST AN 498.- 
325 Doppelkopflaufwerk mit passende- 
nem Anschluß für Atari ST. Eigenes Netzteil 


C64-Abdeckhaube 9.90 
Rouchglas, stoßfeste Ausführung 


STAR NI. 10 
Der meistgekaufte 


- Mofrworucker 
- NLO-Mode 
20 Zeichen pro Sek. im Normalbetrielb 
Zeichen pro Sek im NLO-Betrieb 
kompatibel 


699.00 
Drucker! 


Einsteckbares interiocemodul 
satiel Commodonsintertooe f C&4/C128 
Porollei-Interfooe 

- |BM-Interfoos 

Bei Bestellung bitte interfooe angeben 


CITIZIEN 120D 485.00 
preisgünstigste unter den 


- Centronicsschniftsieile 
- EPSON FX- und BIM- komsafiole Zeichen- 
sütze 


- mit Traktor und Gummiwalze 
- Einzelblatteinzug 


auf Save 523: 


unbedingt beachten! 


Drucker-Zubehör 


Wiesemann-Inter- 
face 92000 


nicsdrucker einen senellen Commodore 
Drucker 

- über 30 Druckertypen anschieäibor 

— lauft mit jeder Commodionssaftwane 


Anschl RE 29.50 
‚enttonicson 


hnittstellen 
Einfoch an USER-Port stecken und feriıgl 
Kein weiteres Interface mehr nötig 


MONITORE 


Der ideale Commodore-IMoniior mit dem 
noch besseren Bild. Speziell für Cö4 C 128 
entwickelt 

— 14 Zoll Bildröhre 


- eingebauter Lautsprecher 
SOMMODORE 1901 
Farbmoni 798.00 


et 
— 14 Zoll Bildröhre 
= verbesserle 


te Auflösung 
Reflexschutzscheibe vor gem Bidischirm 
— Videoanschluß (FBAS oder Composite 
- eingebauter Loufsprecher 
- PAL-RGB-Anschiuß 
ORION- A e 
Monitor 1480 698.00 


GRÜNMONITOR 
mit Ton 

- 2MHZ- 14" . 

- \ideoanschluß 
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ZUBHÖR für MONITORE 
Schwenkfuß 24.90 
für Monitore 


- in allen Richtungen dreh- und feststellbar 
— frei einstellbare Neigung des Monitors 
—- Ideal z. Anpassen an jeden Arbeitsplatz 


Monitor-Anschluß- 
kabel 
für C61/C128 


Umschaltkabel 22.50 
für C128, DIN an Cinch 

Mit diesem Kabel kann man auf einem nor 
malen Monitor im 40 und BO Zeichen-Mo- 
dus arbeiten 


Modems 


(direkt gekoppelt. Keine FTZ-Zulassung! Be 

trieb in der BRD deshalb nur in privaten Ne- 

benstellanlogen. die nicht an das öffentii 
che Femsprechnetz angeschlossen sind 


Universalmodem 99. 00 
für CW/C12 
- 300 a 
- Auto dial/Auto answer-Mode 
CCIT V 21 - mit Commodore C64/128 
Userportanschiuß 
Terminalprogramm auf Diskette 


Universalmodem 
Lieferbar für Commodore-, Atarı- oder 
Computer mit RS232C-Schnittstelle (Appie 
Atar, IBM usw 
- 300/300, 600, 1200 BPS (CCitT V 21, v23 
- 75TV/1200RX, 1200TX. 75RX (zB BIO. 

Bell 103,113,108,202 
- Auto dial, auto answer 


Für C64 229.- 
Für IBM 249.- 

Bei Bestellung bitte Typ angeben! 
De order 39.50 
für C64, C20, C128 


- mit Commodore Anschlußkabel 
Bondzählwerk 


- Sove- 
- Auto-Stop 


BTX-Modul 


mit FTZ-Nr. 198.00 


NEU: RUN-DELA HARDWARE-SERVICE: 
@ RUN-EPROMMER ® 


Aus den Heften 8/10/11! Programmiert 2716 - 27512 Eproms 


Programmierspannungen 25, 21, 125V 


Kein externes Netzteil Softwaremäßig einstellbar 
leerplatine 2 9 = Bausatz kompl. mit Textoolsockel 8 9 = 


Nachnahmeversand NN-Spesen 7.50 DM b. Vorkasse 3-DM. EEE 
Auslandsbestellungen nur gegen Vorkasse + 15.- DM Ver- 
sandkosten. Wir liefern Ihnen auf Ihre Rechnung und Gefahr ak 
zu den Verkaufs- und Lieferbedingungen des Elektronikge- Kaas 
werbes. Fordern Sie unser kostenloses Elektronik-Info an! 


JOYSTICKS 


Die bewährten der Quickshof-Reihe 
QUICKSHOT u 13.90 


- Srober u 
- Feuerknöpfe am Gehüuse und Griff 


DELA- 19.90 
MICRO-FUN 

& Saugtine 

QUICKGUN II 29.90 


- 3 auswechselbare Griffe 
— Microschalter 


COMPETITIONpro 27.90 


Der fast schon legendäre Joystick 


— verschleißfreie Microschalter 
Sougfüße 
- Deuerfeuer 
solides, tormschönes Gehäuse 
DELA-MAUS 99.00 
- DasE der Zukunft 
- läuft überall, wo Eingabe über Joystick 
möglich ist 


benötigt nur kleine Arbeitsfiüche 
— für C64,C 128 + Schneider 


ı TELEFON 
0221/517 7081 
Bonan ur Bez | 
Ger dervon? Haan 
fragen zur Vergungt 


MAILBOX 
0221/514450 
Parameter 


24 Stunden 
ANRUF- 
bean 


tworter 
0221/517084 
Mer können Sie Tag und 
Noch! ihre Bestellung 


Elektronik 


Bestellung/Versand: Maastrichter Str. 23-5000 Köln 1 
Telefon 0221/517081 


DELA jetzt auch in ESSEN 


Schützenbahn 11-13 (DGB-Haus, Porscheplatz 
Telefon 0201/2367 17 j 


® Händleranfragen erw 


GIMA-Printservice, Tel 077/870937, Pb, 186-5900 AD-Venio 
Software-, Diestestraat 133/8, 3000 leuven 


Vertrieb für Hollandt 
Vertrieb für Beigien Second- 
Vertrieb für Dänemark D/C Trading, 


ünscht! @& 


4, 9240 Nibe 


: Sondergade 24, 
Vertrieb für die Schweiz: DIGI SWISS, Steinhauser Straße 44, CH 6300 Zug, Tel 042/413926 


Vertrieb für Österreich‘ ASM Engineering & Con: 
Firma Morhöfer Via Lorenzo iMagnifico 148, 100162 Roma, Teil 6/4270418 
CIMEX, Floridablanca, 54, ent. 3° A 08015 Barcelona, Tel. 223422 


sulting, Wallgosse 39/9, A 1060 Wien, Tei 0222/565241 


Netiine 


Aus: „Computer St{r)icheleien“, einem Buch von Helmut 


Schreiner, Käthe-Bauer-Weg 11, 8000 München 21 


oder übten, um ein letztes Beispiel 
zu nennen, grafisches Gestalten 
und machten dabei einen Kalen- 
der. Rund die Hälfte der Zeit sa- 
ßen die Schüler hinter den Appli- 
kationsprogrammen und ein wei- 
teres Viertel galt EDV-Anwendun- 
gen in thematisch verwandten Be- 
reichen. Das Konzept „Alltagsin- 
formatik“ will kein eigenes Fach 
„Informatik“ einführen, sondern 
sich ausschließlich mit wirklich- 
keitsnahen Anwendungen befas- 
sen, die in den normalen Unter- 
richt einbezogen werden können. 
„Alltagsinformatik“ sei auch der 
Grund für die Gerätewahl, erklär- 
te Professor Kurt Bauknecht, der 
Leiter des Instituts für Informatik 
der Universität Zürich, das den 
Macintosh dem Erziehungsrat in 
einem Gutachten empfohlen hatte. 
Preisgünstigere Geräte, wie der 
Amiga von Commodore oder der 
Atari ST, seien aus der Wahl gefal- 
len, weil das Angebot an Schul- 
spezifischer Software zu gering 
sei. Ein weiteres Kriterium sei die 
Existenz einer zentralen Datenver- 
waltung für die verschiedenen 
Applikationen gewesen. Gegen 
die Wahl der MS-Dos-Welt hätte 
als drittes Kriterium, die weniger 
bedienungsfreundliche Benutzer- 
schnittstelle gesprochen. 
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Zwei Gesetze 


Der US-Kongreß hat nach mehr- 
jährigem Brüten über Fragen zur 
Computersicherheit zwei Gesetze 
verabschiedet, die Computerfiles 
und Datenübertragungen vor 
Hackern, Industriespionen und 
ähnlichen Bösewichten schützen 
sollen. Sind diese Gesetze erst 
einmal von Präsident Reagan un- 
terzeichnet und hiermit in Kraft ge- 
setzt, wird es gegen das Bundes- 
gesetz verstoßen, wenn Daten an- 
gerufen oder verändert werden, 
die in einem Computer eines an- 
deren Staates gespeichert sind. 
Ebenso wird das Abfangen von 
E-Mail oder elektronischen Geld- 
überweisungen sowie die Vertei- 
lung von gestohlenen Paßwörtern 
für kriminelle Zwecke strafbar 
sein. 


Für Computer 
winkt ein 
Steuergesehenk 


Lange Zeit gab es keine einheitli- 
chen Richtlinien um Computer 
steuerlich abzusetzen. Weshalb 
die einen Ausgaben für Personal- 


computer als — steuermindernde 
— Werbungskosten anerkannten, 
andere dies verweigerten. 

Inzwischen ist die Situation etwas 
übersichtlicher geworden. Die 
Oberfinanzdirektionen in Köln 
und Stuttgart haben „Checklisten“ 


herausgegeben, in denen die an- 


zulegenden Maßstäbe detailliert 
beschrieben sind. Diese Grund- 
sätze gelten grundsätzlich nur für 
Finanzämter im Bezirk dieser Be- 
hörden. Nach Einschätzung des 
Bundes der Steuerzahler können 
freilich auch Bürger, die nicht in 
diesen Gebieten wohnen, ihre 
Rechtsposition erheblich verbes- 
sern, wenn sie die Hinweise der 
Oberfinanzdirektionen Köln und 
Stuttgart berücksichtigen. 
Prinzipiell gilt danach: Ein steuer- 
licher Abzug der Auslagen für ei- 
nen Computer kommt nur in Be- 
tracht, wenn dieser so gut wie aus- 
schließlich beruflich genutzt wird. 
Nach einem Urteil des Bundesfi- 
nanzhofes stellen Aufwendungen 
nur dann Werbungskosten dar, 
wenn „sie durch die berufliche 
Tätigkeit des Steuerpflichtigen 
veranlaßt sind“. Da inzwischen 
Computer in den verschiedensten 
Berufssparten eingesetzt werden, 
dürfte die verlagerte berufliche 
Veranlassung im Regelfall be- 
gründbar sein. Keinesfalls können 
Finanzbeamte einen Steuerabzug 
einfach mit der Begründung ver- 
sagen, der Preis für den Compu- 
ter sei ungewöhnlich hoch (Urteil 
des Bundesfinanzhofes vom 15. 
Mai 1981) oder solche Investitio- 
nen seien nicht erforderlich. 

Wird ein Gut beruflich und privat 
genutzt, handelt es sich nach Auf- 
fassung des Staates aber um soge- 
nannte Mischausgaben — und bei 
solchen ist eine steuerliche Be- 
rücksichtigung eben nur unter 
stark einschränkenden Vorausset- 
zungen möglich. Dies hatte dazu 
geführt, daß in der Vergangenheit 
die Anschaffung eines Elektro- 
nengehirns für das eigene Heim 
als Privatsache behandelt wurde. 
Die Verfügung der Oberfinanzdi- 
rektion Köln vom 26. Juli 1985 (an 
die sich Stuttgart anhängte) brach- 
te den Durchbruch. Seitdem gibt 
es für alle Berufe geltende Grund- 
sätze zur fiskalischen Beurteilung 


Entspre- 


von Computerkäufen. 
chend technischer Beschaffenheit 
wurden drei Gruppen gebildet. 


Spielcomputer: Hierbei handelt es 
sich einerseits um Rechner, die 
nur mit einsteckbaren Spielkasset- 
ten betreibbar sind. Dies spricht 


für eine private Nutzung. Ein. 


Steuerabzug wird deshalb verwei- 
gert. 


Aktentaschen- oder Pocket-Rech- 
ner: andererseits verfügen über 
eine eigene Anzeige und sind 
schon wegen ihrer Technik regel- 
mäßig für geschäftliche Zwecke 
bestimmt (Modelle: Epson H x 20, 
Olivetti M 10, Tandy Mod. 100). 
Ein Okay des Finanzamtes ist da- 


her zu erwarten. 


Heimcomputer: Die objektive Be- 
schaffenheit eines Heimcompu- 
ters läßt nicht ohne weiteres auf 
die tatsächliche Verwendung 
schließen. Bei Geräten wie bei- 
spielsweise dem Commodore 
C 64, Schneider CPC 464 oder 
Sinclair ZX bewilligt das Finanz- 
amt eine Steuerersparnis nur 
dann, wenn eine so gut wie aus- 
schließlich berufliche Nutzung 
glaubhaft gemacht wird. Eine sol- 
che wird vermutet, wenn: 


— der Arbeitnehmer berufsspezi- 
fische Software erworben hat, 


— der Computer am Arbeitsplatz 
im Betrieb steht, 


— ein hoher finanzieller Aufwand 
betrieben wurde. Ein Preis von 
über 2000 Mark gilt als Indiz für 
eine fast ausschließlich berufli- 
che Verwendung. 


Wer sich darauf beruft, daß er 
sich mit seinem Heimgerät auf die 
Arbeit im Betrieb vorbereitet, 
muß den richtigen Rechner er- 
werben. Haus- und Bürocomputer 
müssen kompatibel sein. 


Das Fehlen eines Druckers 
spricht nach Ansicht der Finanz- 
verwaltung gegen eine rein beruf- 
liche Nutzung eines Computers, 
es sei denn, daß keine Ergebnis- 
ausdrucke benötigt werden. Ein 
nicht untergeordneter privater 
Mitgebrauch des Personalcompu- 
ters wird unterstellt, wenn anstelle 
eines professionellen Terminals 
ein normales Fernsehgerät ange- 
schlossen ist. Hat der Arbeitneh- 
mer Kinder, die sich in der Ausbil- 
dung befinden, so unterstellen die 
Behörden ebenfalls eine private 
Nutzung. Dies kann vom Steuer- 
zahler aber widerlegt werden. 


Von Roßmöller gibt es jetzt eine neue Tastatur für den C64. Sie stammt aus den 


ommodore-Rechnern 610/710 und wird mittels Interface an die C64-Platine an- 
gesteckt. Die 94 Tasten sind goldkontaktiert und haben einen ähnlichen An- 


schlag und Abstand wie die der Original-C64-Tastatur. Man hat quası eine C64- 
Tastatur mit abgesetztem Zahlenblock und separaten Cursor-Tasten. Die zusätz- 
lichen Funktionstasten können beliebig belegt werden. Mit etwas Geschick 
kann die neue Tastatur in das C64-Originalgehäuse eingebaut werden. Preis mit 
Interface 98, = Mark bei Roßmöller GmbH, Maxstr. 50-52, 5300 Bonn 1. 
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Wird ein Computer als Arbeitsmit- 
tel anerkannt, können Anschaf- 
fungskosten bis zu 800 Mark im 
ersten Jahr in voller Höhe als Wer- 
bungskosten abgezogen werden. 


Höhere Ausgaben sind über die 
Nutzungsdauer (unterstellt wer- 
den fünf Jahre) zu verteilen. 


Aus: Frankfurter Rundschau vom 11. No- 
vember 1986, FR-Ratgeber. 


Copyright 


In San Francisco hat ein Bundes- 
richter zugunsten des Copyright 
für die „allgemeine Erscheinung, 
Struktur und Sequenz“ von Mas- 
ken einer Software entschieden. 
Einige Hersteller von Billigsoft- 
ware sehen dieses Urteil als eine 
Bedrohung dieses Marktes. Es ist 
das erstemal, daß ein Bundesge- 
richt entschieden hat, Hersteller 
von anderer Software, als derjeni- 
ger von Computerspielen seien 
ebenfalls berechtigt, das Erschei- 
nungsbild ihrer Masken urheber- 
rechtlich zu schützen. Das Gericht 
entschied, daß ein Programm, das 
eine Benutzerschnittstelle eines 
anderen kopiert, die Urheber- 
rechtsgesetze verletzt. Es nahm al- 
lerdings nicht zu der Frage Stel- 
lung, wie ähnlich die beiden 
Schnittstellen sein müssen, um das 
Copyright zu verletzen. Konkret 
klagten die beiden kalifornischen 
Softwarehersteller Bowerbond 
und Pixellitesoftware gegen Uni- 
son World/Kyocraonison, dessen 
Programm Printmaster eine Kopie 
der Menümasken, Eingabeforma- 
te und der Reihenfolge der Mas- 
ken von Printshops sei. Der Vorsit- 
zende von Bowerbond, Garry 
Carston, nannte den Entscheid hi- 
storisch. Wenn die Softwareher- 
steller nicht vom Copyrightschutz 
profitieren können, hätten sie we- 
sentlich mehr Mühe, den Vor- 
sprung vor der Konkurrenz zu hal- 
ten. Tom Miller, Verteidiger des 
Angeklagten war der Meinung, 
das Urteil gehe zu weit und gebe 
denjenigen Produzenten einen un- 
fairen Vorteil, die ihr Produkt zu- 
erst auf den Markt gebracht hät- 


ten. 
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Nareawar® Be a 2 “x 
Klein aber 


Betriebssystem-Umschaltplatinen 
gıbt es in den unterschiedlichsten 
Ausführungen. Hier ist die Nonplus- 
ultra-Lösung von Friedrich Hahn. 


Nahezu jeder C64-Besitzer hat erkannt, daß das Ori- 
ginal-Betriebssystem nicht besonders viel hergibt. 
Abhilfe schaffen Umschaltplatinen auf denen sich 
neben dem Original-Kernal noch Steckplätze für 
Eproms befinden, auf die verbesserte Betriebssyste- 
me gebrannt werden können. Meist sind diese Plati- 
nen recht groß, absturzfreies Umschalten ist selten 
möglich. Bei der folgenden Bauanleitung sind drei 
verschiedene Varianten des Ausbaus möglich. Die 
Preiswerteste davon kostet weniger als 20 Mark: 
© Ein Betriebssystem und 7.378 Bytes für Program- 
me (29 Blöcke) mit dem Eprom 27128 
© Betriebssystem alt + Betriebssystem neu und 
14.756 Bytes (58 Blöcke) mit dem Eprom 27256 
© Betriebssystem alt + Betriebssystem neu und 
44.268 Bytes (174 Blöcke) mit dem Eprom 27512 
Empfehlenswert ist der Ausbau mit dem Eprom 
27256. Dabei hat man das beste Preis-Leistungs-Ver- 
hältnis. Ein späterer Ausbau ist leicht möglich, da die 
Adapterplatine und die Programme bereits für den 
großen Ausbau geeignet sind. 
l. Die beiden Programme Rom Programmbank 
und Bankgeneratoren abtippen und auf Diskette 
speichern. 
. Adapterplatine herstellen oder kaufen. 
. Speichern Sie bis 4 Programme Ihrer Wahl auf 
einer Diskettenseite, (max 29 Blöcke) 
. Rom-Programmbank mit 8,1 laden 
. Bankgeneratorprogramm laden. 


Einsprung durch 
Hardware-Reset 


Interrupts 
verhindern 


Bildschirm und 
Farb-RAM löschen 


om 


[0 5 


nein 


Fehlertext 
ausgeben 


Al3 + Al4 = LO (altes 
IC 27256 Eprom-Bereich 0 bis $ifff 


Prinzipschaltung Flußdiagramm für Betriebssystem 
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10. 


1l. 
12. 


13. 
14. 


Bestückung der Platine 


Platinenlayout im Maßstab 1:1 


, Legen Sie die Diskette mit Ihren Programmen 


ein. 


, Bankgenerator mit „RUN" starten. 
, Beantworten Sie die Sicherheitsabfragen des 


Bankgeneratorprogrammes. Beim Erstellen von 
mehreren Bankseiten hintereinander müssen Sie 
die ROM-Programmbank (siehe Punkt 4) jedes- 
mal neu laden. 


. Nach Aufforderung eine Diskette einlegen, auf 


der Ihre brennfertige Bankseite gespeichert 
werden soll. Das Speichern übernimmt selbst- 
verständlich der Bank-Generator für Sie. 

Wenn alle Bankseiten fertig sind, laden Sie mit 
einem Monitor Ihre Betriebssysteme nach $2000 
bis $5FFF, die 1. Bankseite nach $6000 bis $7FFF, 
die 2. Bankseite nach $8000 bis $9FFF und bren- 
nen von $2000 bis $9FFF in ein Eprom 27256. Be- 
achten Sie bitte, daß es vom Eprom 27256 Aus- 
führungen für 12,5 V und 21 V Brennspannungen 
gibt. Im Zweifel brennen Sie immer erst mit der 
kleinen Spannung. 

Nach dem Brennen stecken Sie das Eprom 27256 
in den Sockel der Adapterplatine. 

Computer ausschalten. Netzstecker ziehen, Öff- 
nen Sie nun den C64 (Achtung Garantieverlust!) 
und wechseln das Betriebssystem-IC U4 gegen 
die Adapterplatine. Hoffentlich ist U4 gesockelt. 
Wenn nicht müssen Sie U4 aus- und dafür 24 pol. 
IC-Fassung einlöten. Das ist leichter geschrie- 
ben als getan. Im Zweifel lassen Sie das einen 
Fachmann machen. 

Löten Sie den Reset-Draht an Pin 3 des User- 
ports. 

Schrauben Sie den Computer wieder zu. 
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Bedienung der Erweiterung 
En EEE 


l. Schalten Sie den Rom-Schalter aus. 

2. Den Computer einschalten. 

3. Rom-Schalter einschalten. Mit dem Betriebssy- 
stemschalter können Sie nun die Bankseiten um- 
schalten. 

4. Ein Programm mit den Tasten 1 bis 4 auswählen. 
Mit der Taste Space kommen Sie immer wieder in 
das Menü. Dadurch können Sie mehrere Pro- 
gramme direkt nacheinander laden, sofern diese 
nicht den gleichen Speicherbereich belegen. 

5. Rom-Schalter wieder ausschalten. Bei Basic-Pro- 
grammen (kenntlich durch „**) müssen Sie OLD 
(Re-New) ausführen. In Ihrem neuen Betriebssy- 
stem haben Sie sicher eine OLD-Routine. 


Für den Ausbau mit 5 Programmbänken benötigt 
man eigentlich nur einen Schalter zum Schalten der 
Adreßleitung 15 zusätzlich. 

Das ist keine gute Lösung. Mit einem Drehschalter 
geht es besser. Ein Drehschalter mit 1 mal 8 Schalt- 
stellungen ist schwer zu beschaffen, deshalb kaufen 
Sie einen l mal ll oder l mal 12 pol. Drehschalter 
und benutzen nur 8 Kontakte. Weiterhin benötigen 
Sie noch 14 Stück Germaniumdioden z. B. AAl16. 


Große Programme 
SE ee 


Wenn Sie ein größeres Programm als 29 Blöcke in 
der Rom-Programmbank haben wollen, müssen Sie 
das Programm nach 7376 ($1CDO) Bytes teilen. 

1. Beispiel: Maschinenprogramm!: 

Laden Sie mit 8,1 oder mit einem Monitor an die Ori- 
ginialadresse. Angenommen sei für die Startadresse 
24832 ($6100). Addieren Sie 7376: 24832+7376= 
32208 ($7400) Saven Sie mit einem Monitor: S „name 
teil 1", 6100, 7ddl (Endadresse + 1)S „name teil 2", 
7Zddl, Endadresse +1 

2. Beispiel: BasicProgramm: Laden Sie das Pro- 
gramm normal Startadresse ist jetzt 2049 ($0801) Sa- 
ven Sie mit einem Monitor: S „name teil 1", 0801,24d2 
(Endadresse+1l) S „name teil 2“, 24d2, Endadres- 
se+]l) 

So finden Sie die Endadresse: 

l. Füllen Sie mit einem Monitor den RAM-Speicher 
mit einem Byte Ihrer Wahl — zum Beispiel $bb. 

2. Laden Sie das Programm an die Originaladresse. 
3. Prüfen Sie wieviel $BB-Bytes überschrieben sind. 
Die Initialisierung erfolgt durch einen Hardware-Re- 
set. Mit 6 weiteren Bauteilen läßt sich ein Reset beim 
Wechsel in beide Schaltstellungen auch automatisch 


erreichen. 
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Al3 LO Reset Al4 
. User Port 
3 
Gesamtschaltung 
Schaltung: 
Rom-Schalter 
7 + 
LO 
Reset am C64 
User Port 
Bauteile: *... Pind 
2 Stück Germaniumdio- 
den z.B. AAll6 
2 Stück Kondensatoren 1 
bis5uF 
2 Stück Widerstände 
150 KOhm 


Realisierung eines Auto-RESET 


Adapterplatine 


Wenn Sie die Adapterplatine selbst anfertigen wol- 
len, hilft Ihnen das abgedruckte Platinenlayout. 
Nachstehend eine größere Zeichnung als weitere 
Hilfe, Die Adapterplatine ist für alle Ausbaustufen 
geeignet. Beim großen Ausbau (27512) müssen alle 
drei Widerstände eingelötet werden und die Adreß- 
leitungen Al3, Al4 und Al5 sowie LO von Pin 14 (12) 
zu den Schaltern geführt werden. Bei dem, von mir 
vorgeschlagenen, Ausbau mit IC 27256 bleibt Al5 
frei und statt dem Widerstand R3 wird eine Draht- 
brücke eingelötet. Beim kleinen Ausbau mit IC 27128 
bleiben Al4 und AIl5 frei. Die Widerstände R2 und 
R3 werden durch Drahtbrücken ersetzt. Die erhältli- 
chen Wire-Wrap-Fassungsstreifen haben doch recht 
große Beine, die die meisten Fassungskontakte rui- 
nieren. Ich empfehle Ihnen eine 24 pol. IC-Fassung 
zusätzlich zu benutzen. In diese Fassung stecken Sie 
Kupferdrähte 0,7 mm oder Anschlußdrähte von alten 
Widerständen. Wenn diese Drähte nicht fest in den 
Fassungskontakten sitzen, so löten Sie diese an den 
Kontakt fest. Kürzen Sie die Drähte auf ca. 5 mm und 
löten die Drahtenden auf die Kupferseite der Adap- 
terplatine. Eine Adapterplatine mit so schlanken Bei- 
nen leiert bestimmt keine Fassung mehr aus. 

Zum Schluß wünsche ich Ihnen viel Spaß beim Bauen 
und Arbeiten mit der Erweiterung. 
(Friedrich Hahn/mn) 
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Schaltung zum großen Ausbau 


7cd2 
7cda 
7ce? 
7cea 
TEFE 
7cfa 
7d02 
7dda 
7d12 
7dia 
7d22 
7d2a 
7d32 
7d3a 
7d42 
7d4a 
7d52 
7dS5a 
7d62 
7d6a 
7472 
7d7a 
7d82 
7d8a 
7d92 
7d9a 
7da2 
7daa 
7db2 
7dba 
7dc2 
7dca 
7dd2 
7dda 
7de2 
7dea 
7df2 


10 

20 

30 

40 

5» 

2%) 

70 

80 

Ele) 
108 
11® 
120 
138 
140 
158 
168 
178 
188 
198 
20908 
218 
2208 
230 
2408 
250 
2608 
270 
288 
292 
398 
318 
3298 
338 
340 
350 
368 
378 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


a9,7f,8d,8d,dc,8d,®d,dd, 
8d,20,dc,a9,08,8d,Be,dc, 
Bd,de,dd,Bd,@F,dc,Bd,OofF, 
dd,a2,28,82,23,dc,8e,®3, 
dd,Be,18,d4,ca,8e,02,dc, 
a9,07,8d4,00,dd,39,3F,8d, 
02,dd,a9,e7,85,01,a9,2f, 
85,00,a9,0f,84,86,02,a9, 
200,8d4,29,d0,8d,21,d0,a8, 
85,fb,a9,d8,85,fc,a9,2f, 
9S1,fb,c8,d0,fb,e6,fc,a2, 
de,e4,fc,d8,f3,4c0,28,fe, 
78,20,d2,fc,20,41,fe,aS, 
7F,84,00,dc,ae,®1,dc,e®, 
fe,f®,32,e80,f7,f0,40,89, 
fd,8d,08,dc,ae,®l,dc,eß, 
Fe,f8,5e,e0,f7,f0,78,d0, 
db,ad,8b,05,c9,21,F0,06, 
20,11,fd,20,ef,fd,a9,7f, 
8d,00,dc,ae,®1,dc,ed@,ef, 


da,f9,f0,bd,00,a9,cb,a®, 
£Ff,85,5Ff,84,60,a9,eb,aß, 


£Ff,85,53,84,5b,a9,Bc,a®, 


05,85,58,84,59,20,bf,a3, 


4c,5b,fd,a9,cb,a0,fFf,85, 


Sf,B4,60,a9,eb,a®d,ff,85, 


53,84,5b,a9,8c,a0,05,85, 
58,84,59,20,bf,a3,4c,Sb, 
fd,a9,cb,ad,ff,85,5f,84, 
62,a9,eb,a®d,ff,85,5a,84, 
5b,a9,8c,a0,05,85,58,84, 


59,20,bf,a3,4c,5b,fd,a9, 


cb,a®d,ff,85,5F,84,60,39, 
eb,ad,ff,85,53,84,5b,a9, 
8c,a8,05,85,58,84,59,20, 
bf,a3,4c,5b,fd,a9,ad,a®, 
£ff,85,5f,84,60,a9,cb,ad, 


28 
6d 
B8 
60 
£6 
14 
e5 
7e 
57 
7E 
fd 
65 
61 
bf 
®b 
36 
3b 
44 
07 
di 
Bc 
57 
ee 
ag 
e3 
57 
ES 
la 
d3 
52 
£3 
83 
37 
Y4d 
7a 
6d 
37 


Be 2 
7dfa 388 
 7e02 398 
 7eda 499 
 7el2 N1® 
 7ela 420 
 Te22 438 
7e2a 148 
7e32 450 
7e3a 468 
7e42 470 
7e4a 480 
7852 498 
7e5a 500 
'7e62 510 
7eba 520 
7e72 538 
.7e7a 549 
 7eB2 550 
 '7eBa 558 
 7es2 578 
 7e9a 588 
 . 7ea? 598 
 7esaa 600 
7eb2 618 
7eba 620 
7ec? 638 
 7eca 640 
. 7ed2 658 
7eda 669 
 7ee2 670 


nr—— 


7fo2 7ı8 
7Fda 728 
Ele 738 
fla 748 
TEeD2 758 
7f2a 768 
E32 778 
7f3a 788 
7F42 798 
7F4a 808 
7£S2 818 
7FSa 829 
7f62 830 
7f6a 840 
7£72 858 
7F7a 869 
7F82 870 
7FBa 888 
7fs2 898 
7f9a 928 
7Ffa2 919 
7Faa 928 
7Ffb2 938 
7fba 848 
7fc2 958 
7fca 368 
7fd2 978 
7Ffda 988 
7fe2 992 
7fea 10900 
7Ef2 1010 
7Ffa 1928 
60008 
69018 
60022 
60038 


data ff,85,5a,84,5b,39,8c,a90, ee 
data 05,85,58,84,59,20,bf,a3, a9 
data a9,eb,ad,Ff,85,5F,84,60, a9 
data a9,fc,ad,ff,85,53,84,5b, a3 
data a9,d5,30,05,85,58,84,59, c6 
data 20,bf,a3,4c,68,fd,a9,00, cd 
data a8,85,fb,39,04,85,fc,a9, 47 
data 20,91,£b,c8,d0,fb,e6,fc, 81 
data a2,08,e4,fc,d®,f3,60,a9, 16 
data 00,a0@,ff,85,5Ff,84,60,39, 6c 
data 1f,a0,Ff,85,583,84,5b,a9, 81 
data 9c,a0,04,85,58,84,59,20, 89 
data bf,a3,39,90,a0,ff,85,5F, Fc 
data 84,60,a9,ac,ad,ff,85,5a, ed 
data B4,5b,a9,eb,30,04,85,58, af 
data 84,59,20,bf,a3,a9,20,20, 07 
data ff,85,5f,84,60,a9,2f,a8d, 9b 
data Ff,85,53,84,5b,a9,83,30, e5 
data 05,85,58,84,59,20,bf,a3, a9 
data a9,30,a0,ff,85,5f,84,60, 64 
data a9,4B,a0,Fff,85,53,84,5b, 56 


. data a9,28,a0,06,85,58,84,59, 72 


data 20,bf,a3,a9,48,a0,ff,85, 7d 
data 5f,84,60,a9,60,a0,ff,85, cc 
data 5a,84,5b,39,a0,30,06,85, Ba 
data 58,84,59,20,bF,a3,39,60, 72 
data a®d,ff,85,5f,84,60,39,78, Ic 
data ad,ff,85,53,84,5b,a9,1B, 86 
data a8,27,85,58,84,59,20,bf, 51 
data a3,a9,78,a0,ff,85,5f,84, 27 
data 608,39,90,a0,ff,85,5a,84, E7 
data 5b,39,90,30,07,85,58,84, F9 
data 59,28,bf ,a3,50,20,12,20, a7? 
data 2f,20,2d,20,2d,20,10,20, da 
data 12,20,0F,20,07,20,12,20, bb 
data 01,20,0d4,20,24,20,02,20, 3e 
data 01,20,0e,280,0b,20,20,20, bb 
data 2e,20,12,0f,0d,20,02,05, Fb 
data 12,05,09,03,08,20,ad,bi, FE? 
data ad,20,3d,20,20,20,20,20, aa 
data 20,20,20,20,20,20,20,20, 80 
data 20,20,20,20,28,20,ad,b2, Fb 
data ad,20,3d,20,20,20,20,20, aa 
data 20,20,20,20,20,20,20,20, 28 
data 20,20,20,20,20,20,ad,b3, Fa 
data ad,20,3d,20,20,20,20,20, aa 
data 290,20,20,20,20,20,20,20, 28 
data 20,20,20,20,20,20,ad,b4, F9 
data ad,20,3d,20,20,20,20,20, aa 
data 20,20,20,20,20,20,20,20, 28 
data 208,20,20,20,20,20,a0,96, ®a 
data Bf,8e,30,86,92,89,85,84, 25 
data 92,89,83,88,32,88,81,88, 15 
data Be,a®,a0,36,a0,b2,ae,b3, el 
data a®,20,20,20,92,8Ff,8d,ad, e3 
data 93,83,88,81,8c,94,85,32, 82 
data a0,81,95,93,93,83,88,81, 38 
data 8c,94,85,8e,ad,al,al,al, ee 
data a0,a0,8b,85,89,Be,a®,30, 11 
data 92,87,ae,a0,87,85,93,90, le 
data 85,89,83,88,85,92,94,a0, de 
data 20,20,13,10,01,03,05,20, e6 
data 21,0f,0c,04,20,02,05,09, 34 
data 20,02,01,13,09,03,10,12, 10 
data 27,2e,32,Fd,32,£d,00,08, 45 


for a-31954 to 32762 step 
8:5=-9:c=-ß:for b=® to 7: 
gosub 60040 
s=-s+h+l-c:0=s>255: s=-255-s 
and 255:poke a+tb,h+l:next 
b:gosub 5609840 
f$=-"pruefsumme ok”:if s<> 
h+l then f$="[rvs] 
pruefsummenfehler”:f=f+1 
gosub 68890:next a:print "” 
Edown]"”f"”fehler”:end 
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5934 


5699 
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60048 read h$:gosub 69059: h=1* 2718 
16:h$=-mid$ Ch$,2) 

60050 l=-asc Ch$+”x”)-4B:if 1<® 3198 
or 1>22 then 68088 

60862 if 1<12 then return 1944 

692078 1=1-7:if 1>9 then return 1334 

600808 F$="[rvsleingabefehler”:1=- 2468 


DIEREHL 


6002928 print ”zeile” peek (64)* 2726 


e56+peek ( 


E63)IFf$:return 


saven des programms nach starten 
des loaders mit 


poke 43,218:poke 44,124 
poke 45, P2:poke 46, 
save "name”,8 


128 
20 
30 
40 
508 
60 


798 
80 


so 


100 
118 


120 
130 
140 
158 
169 
178 
180 
198 
200 


2108 
220 
230 
24B 
250 
260 
278 
2808 
2390 
300 
310 
320 
330 
349 
359 
360 
370 
380 
390 
400 
418 
420 
438 
440 
450 
460 
470 
488 
490 
5208 


128 


For i-l to 78:read a:brb+ta:poke 24319+ 3054 


i,a:next 


if b®B388 then print "[Hspaces]fehler 2452 


in datas”:end 


print ”"Lelr,2doun,7spaces2»b ank -g 2535 


enerator"” 


print "[down, Sspaces]c 1986[2spaces] 2517 


Friedrich hahn” 


print "[Sdown, 4spaces]haben sie das 3075 


bank programm” 
print "[4spaces,rvs 
geladen ?[3spaces] 
gosub 348 


Ineuloff] mit B,1 2712 
J3/n" 
588 


print "C2down,4spaceslist die dikette 2373 


mit bis 4 prg." 


print "[4spaces](max 29 bloecke) 3641 
eingelegt ?[4spaces]j/n” 

gosub 349 SB 
print "[2down,4spaces]geben sie den 3229 


rom bereich ein” 


print "[Bspaces])( werte von 1 bis 6 )" 2264 


get qa$:if q$=""” then 130 1454 
q-val (qg$) 497 
if q>6 then 130 1964 
ıf g<1 then 130 1832 
poke 24384, +48 1554 
poke 32545, q+48B 1532 
gosub 460@:rem name 753 
az=-w;:if w>4 then print ”"[clr,4douwn, 4710 
6Sspaces]zu viel prg. auf der disk !”: 

end 

For i=-1 to az 878 
a$-a$li-1):gosub 370:rem anfadr, 1508 
lb(i)=1b:hbli)=-hb:adli)-ad 2151 
lCli)=len (a$li-1)) 975 
For ii=l to l(i) 822 
us-mid$ CaSli-1),ii,1) 1543 
u=asc (u$) 569 
if W683 then u=u-64 1702 
poke 32541+ii+ir24 u 1707 
next ii 323 
if adti)-2049 then poke 32559+1*24,42 e561 
next i 276 
goto 740 584 
get 0$ 4567 
if q$="j" then return 1199 
goto 349 576 
rem --anfangsadresse-- 

open 1,8,2,a$ 1097 
get #1,x$:if x$="" then x$=chr$ (08) 2581 
lb-asc (x$) 762 
get #1,x$:iF x$="" then x$=chr$S (8) 2581 
hb=-asc (x$) 758 
close 1 258 
ad=-hb*256+1b 1154 
return 142 
rem --namen-- 

w-® 388 
open 15,8,15,”i@”:open 2,8,2,"#” 2655 
t=18:5=1 1167 
print#15,"b-r";2;8;t;s 1717 
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518 print#15, "b-p";2;0 1352 
5208 get #2,x$:if x$="" then x$=chr& (09) 2585 
. 530 t=asc (x$) 616 
. 540 get #2,x$:if x$=""” then x8=chr$ (8) 2585 
S58 s-asc (x$) 615 
560 For x=® to 7 348 
578 print#15,”"b-p"”;2;x*32+2 2130 
‚588 FFS-"” 605 
530 get #2,x$:if,x5="" then x$=chr$5 (0) 2585 
608 p=-asc (x$):if p<>138 then 700 1974 
610 get #2,x$ 793 
628 get #2,x$ 793 
638 For y=® to 15 B27 
6408 get #2,x$:if x$="" then x$=chr$ (9) 2585 
659 if asc (x$)-160 then y-15:goto 678 P352 
669 FFS=-FES+x$ 1857 
678 next y 308 
688 a$tlw)=-Ff$ 931 
698 w-w+1 385 
788 next x 396 
718 if t<>® then 5908 1059 
728 close l:close 2:return 764 
738 rem ---poke--- 
748 poke 24339,8 737 
758 poke 24341,96 338 
768 ed(0)-24576 1271 
778 For i=l to az 878 
788 For ii=1 to l(i) 822 
798 uS-mid$ Casti-1),ii,1) 1543 
808 u=asc (u$) 563 
818 poke 24063+ii,u 1369 
8208 next ii 313 
830 poke 24328,1(i) 1053 
840 poke 243380,8:poke ?4332,94 1646 
858 poke 320939+i1*30,peek (24339) 2301 


860 poke 32092+i*30,peek (24341)+128 


878 sys 24328 668 
871 open 1,8,15 335 
872 input#1,21,28 936 
873 if zi-® then 875 1133 
874 print ”"[3down,4right]”;z8:close 1:end 1748 


875 close 1 258 


889 poke 32098+i*30,peek (24339) 2302 

838 poke 32108+i*30, peek (24341)+128 ESLT 

308 edli)-peek (24341)*256+peek (24339) 2558 

912 x-edli)+adli)-edli-1):xh=int (x/256)9: 4503 
RLER-RHIESE 

928 poke 321086+1*30,x1 1958 

938 poke 32108+i*3@,xh 1639 

S40 next i 276 

941 if ed(i-1)<31953 then 959 2249 

342 print "[3downlprogramme sind um"”;edli- 56193 
1)-31953”bytes zu lang !"”:end 

358 print "[clr,5Sdown, Sspaceslder ”g$”. 3658 
rom bereich ist fertig” f 

9608 print "[down,4spacesJdisk einlegen und 3981 
taste druecken” 

978 get q$:if q$="" then 979 1582 

988 sys 24352 772 


9928 end 128 
18988 rem --datas-- 


32000 data 162,8,169,2,32,186,255,169,16, 7438 
se 
16 

32081 data 96,32,213,255,142,19,95,149,21, 7a31 
95,96,162,8,32,186,255,169,14,162,64 

32002 data 160,95,32,189,255,169,0,133,251, 7065 
169,96, 133,252,169,251,162,0,160,128 


I 66,69,82 ‚89,73,67, 7e 


Mit einer Idee aus der Schweiz fing esan — eine ein- 
fache Schaltung ermöglichte es, den RAM-Speicher 
des C64 auf zwei 64K-Bänke auszubauen. RUN-Leser 
erkannten, daß mit den eingebauten 41256-RAM-ICs 
tatsächlich ein Speicherausbau auf 256K möglich ist. 
Vier 64K-Blöcke mit dem C64 zu verwalten ist jedoch 
nicht gerade einfach. Es gibt viele Lösungen, von de- 
nen jede extreme Vorteile und Nachteile bringt. 

Momentan arbeiten die RUN-Hardware-Spezialisten 
an einer ausbaufähigen Platine, die es erlaubt, den 
gesamten 256K-RAM-Speicher komfortabel zu pro- 
grammieren. Der Clou der Lösung liegt darin, daß 
kein Port des C64 verlorengeht. Bislang wird beim 
128K-System über die Datenrichtungs-Register des 
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Mehr Power 
fürs RUN-PRSK- 
System 


RUN-Hardware-Bastler haben es faustdick hinter den 
Ohren. Hunderte Lesereinsendungen beweisen: Jeden 
Tag entstehen neue Ideen zum 128K-System. 


Userports geschaltet, was sich mit Parallel-Floppy- 
speedern wie zum Beispiel SpeedDos, nicht verträgt. 
Eine perfekte Schaltung erfordert viel Entwicklungs- 
zeit. Die Nonplusultra-Lösung zum 128K-System be- 
ziehungsweise 256K-System folgt daher erst in einer 
der kommenden Ausgaben. Im folgenden zwei Le- 
sereinsendungen zum 128K-System, für alle die 
schon jetzt mit 256k-RAM experimentieren möchten. 


Bank-Switehing über 
Datasetten-Port 


Etwas getrübt war die Freude über 128K-RAM bei 
den SpeedDos-Anwendern, da der Userport zum 


Bild 1: Bank-Switching über Disketten-Port 


Schalten der RAM-Bänke ausgelastet wurde. Die fol- 
gende Schaltung (Skizze 1) ermöglicht eine Software- 
Umschaltung über den Prozessorport. Pin 24 der 
6510 CPU steuert den Motor der Datasette. Daher 
kann man an Widerstand R4 (rechtes Ende) im C64, 
den Hi- oder Lo-Pegel über einen Schalter (S2 in Skiz- 
ze) und den 33-Ohm-Widerstand direkt mit dem 
RAM (Pin 1) verbinden. Die Datasette läuft bei dieser 
Lösung allerdings nicht mehr, was SpeedDos-User 
kaum stören wird. Mittels Kippschalter Sl kann 
prellfrei zwischen den beiden RAM-Bänken hin und 
her geschaltet werden. Schalter S2 bestimmt ob soft- 
ware- oder hardwaremäßig geschaltet wird. Die bei- 
den Leuchtdioden zeigen an, welche der beiden 
RAM-Bänke gerade aktiviert ist. 


Neue Softwaresteuerung: 

POKE 0,63 Alle Portleitungen auf Ausgang 
POKE 1,7 BANK 2 aktivieren 

POKE 1,55 BANK | aktivieren 


Schaltungsbeschreibung: 

Die beiden Gatter Nl und N2 bilden. ein RS-Flipflop 
das ein Prellen des Schalters Sl verhindert. N3 und 
N4 sind als Inverter geschaltet. Liegt am Eingang 
von N3 ein Low-Pegel vor, so ist der Ausgang High 
und Transistor Tl schaltet durch (LED 1 leuchtet). 
Der Ausgang von N4 ist dann Low — LED 2 leuchtet 
nicht. Liegt am Eingang von N3 ein High-Pegel an, so 
leuchtet LED 2 und LED 1 bleibt dunkel. 


128K-System-Aufrüstung 
zum 256K-System 


RUN-Leser Frank Falkenroth entwarf eine einfache 
Schaltung mit der es möglich ist, sämtliche 256K- 
RAM der 41256 ICs zu nutzen. Dies ist nicht ganz ein- 
fach, da die zeitliche Verzögerung des Casram-Si- 
gnales beim Switching von vier 64K-Bänken proble- 
matisch ist. Es ist daher günstiger, für die Adressie- 
rung anstelle des Casram-Signals, das Cas-Signal zu 
verwenden. Dadurch wird die Zeit gewonnen, die 
für die Auswertlogik zur Adreßdekodierung benö- 
tigt wird. Um sicherzustellen, daß die Daten am Bus 
rechtzeitig zur Verfügung stehen, werden bei der 
folgenden Schaltung RAM-Bausteine mit 120ns Zu- 
griffszeit verwendet. 

Die Schaltung (Skizze 2): Schalter Sl ist der Wahl- 
schalter zwischen manueller und softwaremäßiger 
Umschaltung. Im geöffneten Zustand liegt der Ein- 


gang von Inverter | auf High-Potential. Der Inverter, 
C1 und RI dienen zum Entprellen des Schalters 
(Schmitt-trigger Gatter). Der Ausgang (Low-Potential) 
wird auf die Gatter 4, 5, 6 und 7 geführt. Im Low-Zu- 
stand geben die ODER-Gatter 4 und 5 die Informatio- 
nen von S2 und S3 frei, während die NAND-Gatter 6 
und 7 die Informationen am Userprot PIN C und D 
(PBO und PB) sperren. Die Schalter S2 und S3 codie- 
ren die vier Speicherbänke binär: 


S2 S3 Bank 
offen offen 0 
offen zu 1 
zu offen 2 
zu zu 3 


Gatter 8 und 9 dienen zum Mischen der Signale, die 
möglicherweise durch Verwendung von Open-Col- 
lektor-Gattern wegfallen können. Gatter 10 und 11 
dienen zur eigentlichen Adreßdekodierung. Die bei- 
den freien Eingänge am Gatter 6 und 7 werden mit 
PIN 7 (PBO) und PIN D (PBl) des Userports verbun- 
den. 

Arbeiten mit der Schaltung: Erst Schalter S1 öffnen 
und dann alle vier Bänke (Anwählen mittels S2 und 
S3) mittels RESET initialisieren. Dann Schalter S1 
schließen. Durch den RESET sind alle Portbits B des 


Bild 2: Erweiterung auf 256 KByte RAM 


Userports auf Eingang geschaltet, haben also HIGH- 
Potential. Dadurch ist Bank 3 aktiv. Jetzt wird das Da- 
tenrichtungsregister mittels POKE 56579,255 auf Aus- 
gang geschaltet. Die vier RAM-Bänke können so- 
dann mittels POKE 56577, (0-3) angewählt werden. 

(]. Woetzel, F. Falkenroth) 


Technische Fragen an den Umbau-Service! 


B. Langer, Kanalstr. 14, 8766 Großheubach, 
Tel. 0 93 71/78 28 (ab 18.00h). 
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PEEKXeShew 


(Ur EIG 


Blättert man als Einsteiger in Compu- 
ter-Zeitschriften, wird man oft mit un- 
bekannten Begriffen konfrontiert. Da 
wimmelt es von Bitmustern und Hex- 
zahlen, ROM und RAM, low und high 
Bytes, Müllabfuhr oder gar „verbo- 
genen Zeigern". Um von den angebo- 
tenen Ratschlägen Gebrauch zu 
machen, muß man über einige 
Grundkenntnisse über die innere Or- 
ganisation des Rechners verfügen. 


Einen Computerspeicher kann man sich als lange 
Straße vorstellen, deren Häuser (die Bytes) die Haus- 
nummern 0 bis 65535 tragen. Jedes Haus hat acht 
Fenster (Bits), die hell (1) oder dunkel (0) sein kön- 
nen, und an denen man den Inhalt oder Wert able- 
sen kann. Mit acht Bits lassen sich die Zahlen 0 (alle 
Bits sind 0) bis 255 (alle Bits sind 1) darstellen. Alle 
anderen Bitmuster liegen dazwischen. 

Zu dieser Speicherstraße gibt es ein Adreßbuch mit 
256 Seiten, von denen jede 256 Adressen aufnehmen 
kann. Das ist die Speicherbelegungstabelle, von der 
eine stark verkürzte Version im Handbuch auf Seite 
228 zu finden ist. 


Adreßbuch mit 256 Adressen 
RER ERBE) 


Auf Seite Null der Speichertabelle (Zeropage) stehen 
alle Adressen, die sich durch ein einziges Byte dar- 
stellen lassen. Größere Adressen muß man in ein 
niederes Byte L (low) und ein höheres Byte H (high) 
aufteilen. 

H=INT(AD/256), L= AD-H*256. 

H gibt die Seitenzahl und L die Nummer der Eintra- 
gung auf dieser Seite an. Für die Änfangsadresse 
des Bildschirmspeichers, AD=3072, gibt zum Bei- 
spiel H%=3072/256=12 und L=3072-12*256=0. Der 
Bildschirmspeicher beginnt also auf Seite 12 ganz 
oben links. Weil für das höhere Byte eine Integerva- 
riable gewählt wurde, konnte auf „INT()" verzichtet 
werden. 


Die Zeropage stellt eine Art Inhaltsverzeichnis des 
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Adreßbuchs dar. Sie enthält unter anderem eine Rei- 
he von „Zeigern", das sind Paare von nebeneinan- 
derliegenden Speicherstellen, die das niedere und 
höhere Byte der Anfangsadresse eines Speicherbe- 
reiches enthalten. Da. im Handbuch die Zeropage 
des C16 und Plus/4 nicht abgedruckt ist, sind in Bild 
l die Zeiger aufgeführt, die den Benutzerspeicher in 
fünf Bereiche gliedern. Wie Bild 2 zeigt, beginnt er 
bei 4097, somit auf Seite 16, mit dem Basic-Pro- 
grammspeicher. Anschließend werden die einfa- 
chen und dann die Feldvariablen (Arrays) abgelegt. 
Der Text der Stringvariablen wird von der Speicher- 


Bild 1: Zeiger-Tabelle aus der Zeropage des C16 und Plus/4 


grenze aus in Richtung abnehmender „Hausnum- 
mern" abgespeichert, so daß mit wachsendem Pro- 
gramm der freie Speicherraum von zwei Seiten her 
eingeengt wird. Wenn er aufgebraucht ist, gibt es 
eine „OUT OF MEMORY", eine dem C16-Benutzer 
wohlbekannte Fehlermeldung. 
Im Gegensatz zum C64 reicht bei den kleinen Brü- 
‚ dern der Benutzerspeicher nicht bis zur sogenannten 
RAM-Grenze. Der C16 reserviert sich 10 Bytes für 
Notizen und der Plus/4 benutzt die letzten drei Seiten 
(768 Bytes) für Ein-/Ausgabe-Operationen. 
Nur der Basic-Anfang und die Speichergrenze ha- 
ben während einer Programmentwicklung feste 
Adressen, die übrigen Bereichsgrenzen werden mit 
jeder neuen Programmzeile und jeder Variablende- 
finition verschoben. Wo sie sich jeweils befinden, 
kann man mit folgender Formel bei den Zeropage- 
Zeigern abfragen: 
AD=PEEK(L) + 256*PEEK(H) 
Da diese Formel häufig gebraucht wird, bietet es 
sich an, sie auf Funktionstaste 8 zu legen: 
KEY8, „PRINT PEEK(43)+256*PEEK(44)" 


256K Superepromkarte 
he 
0. Gehöuse 1 


Speicherkapazität 
— B Steckplätze für 8/16/32K-Eproms 


— 256K 


Leerplatine 7. 
— 2x 8K oder 1x 16K-Eproms 
- Um-/ und Abschaltbar 


- Resettaster 
— Präzisionssockel 
Epromkarte 41 N nocr 24.90 


re 9.90 
- are any mas 
— für 4x BK-Modulprogramme oder 
— für 4 eteme Betriebssysteme 
— Resettaster 


ee 


125 V, 21 V,25V 
- Schnell Langsamprogrammierung 


Startmenü 
- Auslesen, Leertest, Vergleichen, Kopieren 
- Userportbetrieb 
Kombi-Pack Il 189.- 
Eprommer II + &4K-Superepromkarte 
Kombi-Pack Ill 249.- 


Eprommer II + 256K-Superepromkarte 


IC-Tester 134.- 
- testet fast alle TTL-ICs bis 20 Pins 
- selbständiges Erkennen der Typen 


— Dauertestfunktion 
— Software auf Diskette 
— Textoolsockel 


16K-RAM Modul 69.- 

— voll bestückt 

- 8/16K Soft-eprom 

— ext, Betrielbssysternfunktion 

- Anschluß für Akku oder Batterie 

Epromlösc. ät 115.- 
tes 


— 3-Minuten-Löschzeit 


2-facı 
Beiriebssystemkarte 


- = TxaK-Eprom 


Leerpiatine 9.- o Schalter 24,90 


Leerplatine .- tert.m Schotter 29.90 


64K-Superepromkarte 

m. Genaue 49.50 
— für 2x 32K Eproms 
- sonst. Daten wie 256K-Karte 


3-fach Betriebs- 
systemkarte für C128 


- mm 3 Betriebssysternen 
problemioser Einbau 


Leeplatine 6.-  fertigm. Schalter 30.- 


$5-fach 
Betriebssystemkarte_ 


— 2xBK oder 2x 16K-Eprom + 


- di 
Leerpiofine 12.- 


o. Schalter 29.90 
3 


m. schalter 39,90 


Steuern + Regeln 
mit C64/128 


Sen für ec Licht- 


- bis Ei 16 Mo ann Ineoant 
— alle Karten mit Schraubanschlüssen 
Softwareadıi 


— jede Karte auch einzeln zu betreiben 
Das System besteht aus: 
Relaiskarte 98.- 
- 8 Relais mit je 1 «UM 

— 5A Schatfleistung 


Digital- 

eingabekarte 49.- 
- 3 Kandle mit je 8 TTL-Eingängen 
Digital- 

ausgabekarte 49.- 


- 3 Kandle mit je 8 TTL-Ausgüngen 


zubehör Gabel Korte-Karte 5.90 


rien Korte-Userport 


29.50 
Programmier- 
hilfemodul 49.- 
- Einfaches Erstellen von 
Programmen 
- Ihem v. lauffertigen Steuerungen 
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ee - DOS 5.1-Befehle 
 — F-Tastenbelegung mit dir, load, save usw. 


Profi-Betriebs- 
system 


aufsteckbar 
- DOS-Befehle auf F-Tasten 
— viele Sonderfunktionen mit CTRL-Tasten 
- 7x schneller Laden mit 1541 


Modulgenerator 25.- 


unabhängig vom Epromer 
— für 8/16K-Modtule 
frei definierbares Einschaltmenü 
- beilebige Anzahl von Programmen 


oe -Modul 49.- 


— druckt jeden Bildschimminhalt 


uabstufung 
— Abspeichem von Blid u. Sprites für Weiter 
verarbeitung mit anderen Programmen 
- für Centronicsdrucker und MPS801 
(kompatible) 
— Centronicsinterface am Userport 


‘ DELA-DOS 99. 
: Dos Supermodul 


nidlon für Text und Grafik 
integriert 


— Rahmen- und Hintergrundfarben über 
bar 


Das Originalbetriebssystem bleibt 
voll erhalten! Das bedeutet: 

— kein Verlust der Cassettenroufinen 
— kein Verlust der RS232 Schnittstelle 


Steckplatz- 

erweiterung ‚= 
Bausatz 69.- 
- vier Steckplätz 

- über Taster umzuschalten 

- Toster 


- alle wichtigen Signale geschaltet 


Userportdisplay 29.50 


- LED-Anzeige der Userpörtsignale 

- Durchgeschliffener Userport. Karte kann 
zwischen Userport und jedes Gerät 
geschaltet werden 

- Signale P80-PB7, Pa2, log? UNE 
werden angezeigt 

— Ausführl. Anleitung m. DEMO-Programmen 


3-fach Userport- 
expander 35.00 


— kein Umstecken am Userport mehr 

- Centronicsschnittstelle bleibt durch ein- 
Elektronik in Betrieb 

- wenig Platzbedarf (2 Stecker senkrecht‘) 


Userportreset 11. 1.90 
Für alle, die noch keine Resettaster 

unbedingt erforderlich Aukkarlet ae auch 

om neuen O4 


© CPM-Modul 169.- 


Sie aus Ihrem C 64 einen 


een. Dos Moduls! vol CME 


3 eigener Z80-Prozessor 
i& — 2MHZ Taktfrequenz 
"= C64-CPM uneingeschränkt lauffähig 


- arbeitet mit Speed-Dos etc 
- mit Gehäuse 


 . 80-Zeichenkarte 169.- 
" Einfoch 


und $ie haben sofort 
Bildschirm. 


Maschinenprogramme möglich 


; — Diskette m. Paralleibetriebssystem für Cö4 
$ a en a BE at ir 
benutzen, 


DELA SPEED 
Porallelseh, Sn 189.- 


..: 8Kanal 
.. . Logik-Analisator 139.- 


8 Datenkanäle auf dem Bildschimn 
darstell 


— komtortalble Steuersoftware 

Gehäuse f. Eprommer Il 

und 256K-Karte je 19.50 

Winkeladapterpiatine 7.% 

Lochrasterkarte UP/EX-Port 12.00 

Lochrosterk. für Ex-port 6.9 

Lochrasterk. für Usenport sa 

ine 11% 

Gehöuse hierfür 22 

ia nie ne: v 29.50 

Verb.-kabel Userp.-Centronc 29.50 

$ M 

Anschlu 24.50 

— mit 40 Pol. IC-Sockel. 1541 

- mit durchgeführten 

er ics-Schnittstelle bleibt in Betriebl! 

- arbeitet mit allen Lightpen- ä 

— gute Auflösung 

- große Empfindlichkeit 

Für C16-Fans 

Speicherweiteru 

auf 64 K (steckmoaul) un 

E16/C116 Üserpo 45.- 
LA-Userport die 


Kontaktieiste, Sie der 


Cassettenport-Adapter 


64K- RAM-FLOPPY 149.- 


- normaler Load-/Save-/Open-Befehl 


: = Directory 


- Editor 


ı — komplett mit Steuenprogramm und RAMe 
$ bestückt. 


— Anschluß für ext. Batterie- oder 


” Netzversorgung 
> — lauft mit Speed-Dos und anderen 


Erweiterungen 


KUPS nm NE TE 


Tip 2: Mit Funktionstasten spart man sich Schreib- 
arbeit. 


Nach NEW, Betätigung der Funktionstaste 8 und RE- 
TURN bekommt man als Ergebnis 4097 auf den Bild- 
schirm. Zur Abfrage anderer Zeiger müssen die 
Werte in Klammern geändert werden. Mit den 
Adressen 55 und 56 läßt sich die Speichergrenze ab- 
fragen. Beim C16 beträgt sie 16374 und beim Plus/4 
64768. Das sind die 12277 beziehungsweise 60671 
u Bytes, die in der Einschaltmeldung erschei- 
nen 

' Im Zeiger 51/52 steht der gleiche Wert, da noch kei- 
ne Stringtexte eingegeben wurden. Für den Varia- 
blenanfang und den Beginn der Felder ergibt sich 
die Adresse 4099. Kommt eine neue Variable hinzu, 
beispielsweise A = 5, verschiebt sich der Variablen- 
anfang um sieben Bytes. Der neue Variablenanfang 
liegt bei Adresse 4106. 
Feldvariablen benötigen mehr Speicher als einfache 
Variablen. A(4,4) = 5 verschiebt den Variablenspei- 


Speichergrenze 


String-Texte 


freier 
Speicher- 
Bereich 


Feldvariable 
(Arrays) 
einfache 
Variable 


Basic 
Programm- 
Speicher 


Bildschirm- 
Speicher 
Farbspeicher 


Systemspeicher 


Bild 2: Speicheraufbau des C16 und Plus/4 (ohne Grafik 
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cher auf Adresse 4720. Sie kostet demnach 614 Bytes 
kostbaren Speicher. Um diesen Vorgang besser zu 
verstehen, sollte man die FRE-Funktion verwenden. 
Ein Blick auf Bild 2 zeigt, daß der freie Speicher zwi- 
schen den Zeigern 49/50 und 51/52 liegt. FRE(0) 
zieht den Inhalt beider Adressen voneinander ab. 
Zwischen den Klammern der FRE-Funktion kann üb- 
rigens eine beliebige Zahl stehen. Zurück zu den 
Feldvariablen. Wenn irgendwo im Programm eine 
Feldvariable auftaucht, reserviert der Computer 
automatisch Speicherplatz für das komplette Feld. 
Wird die Größe nicht durch einen vorangestellten 
DIM-Befehl definiert, richtet der Computer das Feld 
auf 11 x ll Felder ein. Für ein zweidimensionales 
Feld sind das 121 Elemente. Für jede Fließkomma- 
Variable reserviert er fünf Plätze, macht 605 Bytes, 
den Rest braucht er für die Verwaltung des Feldes. 
Übrigens, Integer-Variablen brauchen in Feldern 
nur 2 Bytes. Die Null-Elemente nicht vergessen! 

DIM A(4):FOR I = OTO 4:All) = I + 1:NEXT 

braucht weniger Platz als 

DIM Aß):FOR I = 1 TO 5:AD) = I:NEXT 


Was wird aus den „festen Grenzen", die den Benut- 
zerspeicher einrahmen, wenn die hochauflösende 
Grafik mit GRAPHIC | oder GRAPHIC 2 eingeschal- 
tet wird? Der Basic-Anfang bleibt an seinem Platz. 
Die Speichergrenze rutscht um 10230 Bytes auf 6144 
herunter. Der freie Speicherplatz schrumpft dadurch 
auf mikrige 2045 Bytes zusammen. Das gleiche Er- 
gebnis liefert übrigens FRE(0). Kehrt man mit GRA- 
PHIC 0 zum Textbildschirm zurück, gewinnt der Pro- 
grammierer keinen Speicherplatz. Schließlich soll 
die Grafik erhalten bleiben. Erst nach GRAPHIC 
CLR kann der Speicher wieder erweitert werden. 


eo 


Solche Speicherplatzsorgen haben Plus/4-Besitzer 
nicht, ihnen bleiben nach Einschalten der Grafik 
noch 48381 Bytes. Beim Plus/4 wird übrigens am un- 
teren Ende des Speichers Platz für den’ Grafikbild- 
schirm geschaffen, indem der Basic-Anfang um 12 
KByte (12288 Byte) hinaufgesetzt wird. Bild 3 zeigt die 
Lage des Benutzerspeichers bei beiden Rechnern, 
mit und ohne Grafik. Beim Plus/4 ist übrigens keine 
Taste mit dem Befehl „GRAPHIC" belegt. 

Als Beispiel was man mit den besprochenen Adres- 
sen anfangen kann, eine Merge-Routine mit der sich 
zwei Basic-Programme vereinigen lassen. Zunächst 
holt der Programmierer das zweite Programm in den 


Speicher. Die Zeilennummern sind jetzt so zu än-»> 


KERNE 


Schon immer wurde darüber erzählt, aber noch nie hat 
man es bekommen, das 


SCHNELLFEUERMODUL 


Schußfolge stufenlos verstellbar, ab- 
schaltbar, leuchtdiodengeprüft, nur 


BEE 522523203 205225225225225225227227227227227227227227220 
KOBOLD 64 - ein brandneues Disk-Utility-Programm 


- I verwaltet auf komfortable Weise Ihre Disketten: 


Disk-Monitor, BAM-Monitor, Directory- 
plus Etiketten-Ausdruck etc. — 
alles in Window-Technik nur 


RER ERRETTRRETTEN 


TURBO-MODUL - Turbo-Tape, Turbo- 
Disk, F.-Tasten-Belegung, Centronics- 
Schnittstelle, Masch.-Monitor nur 


SEREREERERFFERERRER FREI T IE EN 
S-MODUL - 32 neue BASIC-Befehle, 
22 Befehle für Maschinensprache- 0m49,- 
Monitor nur 
SERERRREREREFFEREREREFTRFTTTENR 
Betriebssysteme am C 64 


1 Sockel: 1 Sockel: 2 Sockel: 
1 x neu (2764) 1xalt 1xalt 
1x neu 14,90 1x neu 


* Sofort lieferbar « AMIGA, AMIGA « Sofort lieferbar * 


Amiga komplett monatlich ................- DM 84,— 
Finanzierung durch unsere Hausbank 

Doppellaufwerke 4880 KB .....nuuunnnnnnen- DM 998, — 
Einzellaufwerk 880 KB .........uuuusususnu00n DM 599, — 
RAM-Erweiterung 256 KB ......uuuusenennnn- DM 149, — 
ee DM 98,— 


%* Sofort lieferbar « AMIGA, AMIGA « Sofort lieferbar % 


%* COMMODORE, COMMODORE, COMMODORE % 


RAMCARD 8K für C 64/C 128 nur DM 69,- 
RAMCARD 2 x 8K für C 64/C 128 nur DM 99,- 


RAMCARD 
— gibt Ihnen 1 x 8K/2 x 8K für Ihren C 64 zusätzlich! 


- läuft wie eine Epromkarte für 8/16 KByte, kann aber 
beliebig oft neu beschrieben werden. 


- gespeicherte Basic- oder Maschinenprogramme 
sind sofort nach dem Einschalten des Rechners 
»da« ! 


— ist batteriegepuffert, daher kein Programmverlust bei 
Systemabsturz oder Ausschalten des Rechners. 


- ist der Speicher »in der Westentasche« für häufig 
benutzte Programme, die überall mitgenommen und 
einfach durch andere ersetzt werden. 


%* COMMODORE, COMMODORE, COMMODORE * 


THE FINAL CARTRIDGE Il 


Das neue Betriebssystem in der Modulbox für den Expansionsport - ohne Umbau oder Löten! 
Machen Sie Ihren C 64 komfortabel und Ihre Floppy schnell! (C 128 im 64er-Mode) 


er. 


Kaufen Sie nur das Originalprodukt - keine Raubkopie — wenn’s richtig laufen soll! 


Was das FINAL CARTRIDGE bisher schon leistete, wissen Sie aus unseren Anzeigen 
in RUN 11/86 Seite 43, 64’er 11/86 Seite 115 und dem Test in RUN 6/86 


NEU am FINAL CARTRIDGE Il ist, daß gefreezete Programme 
auf jedem C 64/C 128 Rechner auch ohne FINAL CARTRIDGE-Modul laufen. 


UNSERE DRUCKERPARADE 


DER PREISGÜNSTIGE 
CITIZEN 120 D 


DER UNIVERSELLE 


ag NL 10 
für Ce 


mit Interfa ommodore 


Farbmonitor 
PHILIPS CM 8500 


om 489,— 
Anschlußkabel C Burc 128 


4,90 


Modulport-Erweiterung 
Zweifach 
Dreifach 


Viertach 
Fünffach 


Versandpauschale a DM 10,- 


Alte Linner Straße 38 
4150 Krefeld 
Telefon 0 21 51/2 24 20 


Hammacherstraße 42 
4300 Essen 1 
Telefon 02 01/22 41 41 


WWW. MONBSOMPLUTERWORLB.EOM 


Händleranfragen angenehm 


Besuchen Sie uns auf der Hobby-tronic vom 18.—22. Februar 1987 


DER SCHNELLE 
NDR KX-P 1092 


COMMODORE Maus 
lauffähig mit jeder Software 
mit Joystick-Abfrage 


a — tr — 
DISKETTEN 


3/2" NoName 10Stck. DM29,- 
dazu Disketten-Box für 50 Stck. 
mit Schloß DM 14,90 
5'/" NoName 100Stck. DM 89,- 
dazu Disketten-Box für 100 Stck. 


mit Schloß DM 14,90 
Versand nur durch Nachnahme 


nein 


Inh. Milan Rajcic 


ORGANISATION 
UND VERTRIEB 


KUrS Re 2 ESTER 


dern, daß sie größer sind als die im ersten Pro- 
gramm. Mit RENUMBER geht das sehr schnell. Er- 
läuterungen hierzu auf Seite 136 im Handbuch. Nach 
der Umnumerierung muß das Programm mit dem 
Namen „P2" auf dem Datenträger gespeichert wer- 
den. Vor dem Laden des ersten Programms muß 
beim Plus/4 „GRAPHIC CLR' eingetippt werden. So- 
mit stellt der Programmierer sicher, daß das Pro- 
gramm ab Adresse 4097 im Speicher steht. Es endet 
zwei Bytes vor dem Variablen-Anfang, dessen 
Adresse bekanntlich im Zeiger 45/46 steht. Jetzt 
„verbiegen" wir den Zeiger 43/44 (Basic-Anfang) so, 
daß das zweite Programm ab dem Ende des ersten 
Programms folgt. Nach dem Ladevorgang muß der 
Basic-Anfang wieder zurückverlegt werden. In 
Adresse 46 muß 16 (INT(4097/256)) und in Adresse 
45 eine | gePOKEed werden. 


u o g Z RE: - = 7% e { 
1. Im zweiten Programm die Zeilennummern mit 


16374 


12277 2047 


Bild 3: Speicher-Belegung mit und ohne Grafik 


In seltenen Fällen bekommt man bei Schritt 5 eine 
Fehlermeldung wenn PEEK(45) einen Wert kleiner 
als 2 ergibt. Abhilfe schafft eine REM-Zeile im ersten 
Programm und Wiederholung der Schritte 5 bis 7. 


So stehen Variablen im Speicher 
en nn 3 EIERN 


Nachdem der Speicher mit Hilfe der Zeiger von au- 
ßen untersucht wurde, ist es interessant zu sehen, 
wie Programm und Variablen im Speicher stehen. 
Die Speicherbereiche lassen sich mit PEEK oder 
dem Tedmon auslesen. Es gibt noch eine weitere 
Möglichkeit wie man den Computer bei seiner Ar- 
beit beobachten kann. 

Dazu wird einfach der Variablenspeicher in den 
Bildschirm verlagert. Das erreicht man durch Än- 
dern des höheren Bytes der Zeropage-Adresse 48. 
Die Bildschirmadresse hat das High-Byte 12. 

Jetzt muß folgende Zeile eingegeben werden 
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POKE 46,12:CLR 

Achtung! CLR sorgt dafür, daß die „Umzugsmel- 
dung“ an alle „Dienststellen“ des Betriebssystems 
weitergeleitet wird. Mit den CBM- und SHIFT-Tasten 
wird noch der Kleinschriftmodus aktiviert und an- 
schließend der Bildschirm gelöscht. Einige Zeilen 
weiter unten definiert der Programmierer die erste 
Variable: ab = 0. 

Nach RETURN sollte in der obersten Bildschirmzeile 
eine Gruppe von sieben Zeichen erscheinen. Die 
beiden ersten Zeichen (in Großschrift) geben den 
Variablennamen an. In der 3. bis 7. Stelle ist der 
Wert der Variablen „ab“ verschlüsselt. Im Beispiel 
ist er Null, deshalb sind die Stellen mit Klammeraffen 
(@) gefüllt. Diesem sonderbaren Zeichen wird der 
Programmierer häufig begegnen, es steht im Bild- 
schirm-Code für die Null. Auf die Zahlencodierung 
wird in der nächsten Folge ausführlich eingegangen. 
Die Code-Tabellen im Handbuch (Seite 213 bis 217) 
eignen sich vorzüglich um den Unterschied zwischen 
Bildschirm- und ASCII-Codierung kennenzulernen. 
Alle Zeichen, die per Tastatur in den Computer ein- 
getippt werden, werden im Speicher im ASCII-For- 
mat gespeichert. Für den Klein-Groß-Zeichensatz, 
der leider nicht in der ASCII-Tabelle aufgeführt ist, 
gilt a=65 und b=66. Wenn die Codenummern auf 
dem Bildschirm dargestellt werden, dann geschieht 
das im Bildschirmcode, bei dem 65=A und 66=B be- 
deutet. Daher also die geheimnisvolle Umwandlung 
der Klein- in Großbuchstaben. 


Wozu benötigt man eigentlich zwei Code-Systeme? 
Der Bildschirmcode dient nur zur Ausgabe der Da- 
ten. Er verbraucht die Hälfte der 256 möglichen 
Zeichen für die inverse Darstellung. Andererseits 
braucht der Rechner eine Reihe Steuerzeichen (zum 
Beispiel für die Cursorbewegungen), die nicht dar- 
gestellt werden sollen. Übrigens liegen die Groß- 
buchstaben jeweils um 64 höher als die kleinen und 
die inversen Zeichen liegen um 128 höher als die zu- 
gehörigen normalen. Einige Beispiele: a=1, A=65, 
inverses a=129 und inverses A= 19. 

Jetzt ist es noch interessant zu wissen, wie der Com- 
puter die verschiedenen Variablentypen voneinan- 
der unterscheidet. Die Zeile ab%=0:ab=" ":? fnab 
verdeutlicht die Unterschiede. Der letzte Befehl be- 
wirkt zwar einen SYNTAX ERROR, ist aber nicht wei- 
ter wichtig. Auf dem Bildschirm sind anschließend 
vier Siebenergruppen zu sehen. Alle beginnen mit 
dem Variablennamen AB, aber nur bei der Fließ- 
kommavariablen sind beide Zeichen normal abge- 
bildet. Bei der Integervariablen sind beide Zeichen 
invers, beim String ist es nur das zweite Zeichen und 
bei der Funktionsvariablen nur das erste. Inverse 
Zeichen sind vom Rechner problemlos zu erkennen, 
ihr erstes Bit (das 128er Bit) enthält den Wert 1. 

Alle einfachen Variablen werden demnach in Siebe- 
nergruppen dargestellt, obwohl sich Integervaria- 


Variablen in Siebenergruppen 


Er ist der Herr der zehntausend Welten. Und jetzt will er auch ' gibt es für den C 64. Und wer mehr über unsere Spiele wis- 
der Herr Deiner Welt werden. Der Machtwächter. Er ist fast ı sen will, dem schicken wir gerne unseren Gesamtkatalog zu. 
unbesiegbar. Er hat alles unter Kontrolle. Und wer ihm in die a 

Quere kommt, bezahlt dafür mit seiner Energie. Doch auch ein 

Machtwächter kann geschlagen werden. Aber Mut alleine reicht ! Pu: 

nicht. Dazu braucht man eine perfekte Strategie. The Sentinel 1 An: ariolasoft, Carl-Bertelsmann-Str. 161, 4830 Gütersloh 


Von Experten 
für Experten. 


rireBstrecd 


Drehspul- 
Einbauinstrumente: 


Skala 60X45 mm, Ein- 
bauflansch 38 mm %, 
Tiefe 32 mm. Klasse: 2,5, 
moderne rechteckige 
Form, Abdeckung indu- 
striegrau, Flachbogen- 
skala, Nullpunktkorrek- 
tur, alle Instrumente sind 
für Beleuchtung vorbe- 
reitet und verdrahtet. Mit 
2 Lampen & 6 V (Best.-Nr. 
0503529) wird die Skala 
indirekt beleuchtet. 


Stück 22,50 DM 
Ri. 


1,2kOhm 
550 Ohm 
550 Ohm 
150 Ohm 
1O0hm 
1Ohm 
1O0hm 
1O0hm 
1Ohm 
15kOhm 
25kOhm 
30kOhm 
50kOhm 
300kOhm 


RENKFORCE®- 
Vor-/Rück- 
wärtszähler: 


Elektronischer Zähler 
mit rotleuchtender 13- 
mm-LED-Anzeige, die 
wahlweise senk- oder 
waagerecht eingebaut 
werden kann. — Beson- 
ders einfacher und pro- 
blemloser Aufbau durch 
IC-Technik (ICM-7217). Betriebsspanng.: 7-12 V= 
(max. 200 mA). Nullsetzung per Taster, exakte Im- 
pulszählung von 1-9999 durch elektron. Kontakt 
oder präzisen (prellfreien) Schalter. Ideal als Basis- 
Baustein für digitale Bandzählwerke, wobei das 
setzbare Register auch NULLSTOP o. ä. Funktionen 
erlaubt. Personenzählung mit entspr. Lichtschranke 
u.v.a. mehr. Kompl. mit allen Bauteilen, gedr. Platine 
und Anleitung (o. Netzteil). 
Best.-Nr. 0400970 


Funktionsgenerator 1 Hz-100 kHz: 


Dekadische Bereichsumschaltung, lineare Skala und 
ergonomische Anordnung der Bedienelemente. Aus- 
gang (symmetrisch) umschaltbar auf Sinus, Dreieck, 
Rechteck und TTL, Lautsprecher (8 Ohm), direkt an- 
schließbare Bereiche: 1-10 / 10-100 / 100-1000 Hz/ 
1-10 / 10-100 kHz, Ausgang 0-0,1 / 1,0 / 10 Volt, 
Cynch-Buchsen, dunkelbraun lackiertes Stahlblech- 
gehäuse mit Alufront, BXHXT: 200x100x220 mm, 
dreiadrige Netzleitung 1,5 m, Lieferung mit Anlei- 
tung und Schaltplan. 

Best.-Nr. 0603136 


Wichtig für Ihre Gesundheit. 
Richtige Beleuchtung schont die Augen. 


| Lichtmeßgerät 

„LUX-3": 

Immer sekundenschnelle 
Messungen. Für Büro, 
Haushalt, Arbeitsplatz, 
Hobby, Sport, Schule 
u.v.a.m. Handliches Ge- 
rät komplett mit Pflan- 
zenlichttabelle. 


17,95DM | 


WNSNERENETERWERED RN 


10-Amp.-Bereich! 


LCD-Digital- 
Multimeter 
LDM-7S: 


3%Astelliges, robustes 
Multimeter mit prak- 
tischem Drehschalter. 
Überlastschutz (2 A5x20 
Sicherung) in allen Berei- 
chen außer 10 A=. Zu- 
sätzl. Dioden-Test. Ver- 
senkte 4-mm-Buchsen, 
10 mm LCD-Anzeige, 
Eingangswiderstand 
10 MOhm. Genauigkeit: 
+ 1 Digit. 
Daten: 
V=: 0-200mV/2/20/200/ 
1000 V 
Vn:200/750V 
0-200 uA/2/20/200 mA/2/10 A 
Ohm: 0-200 Ohm/2/20/200 kN\/2/20 MOhm. 
BxHxT: 80x150x33 mm, mit Meßkabeln, Ersatz- 
Sicherung und Anleitung (engl.). 


Passende 9-V-Batterie „UM-5" 
Best.-Nr. 0311530 


% Ein Preisschlager in kompakter Ausführung 
(nicht größer als eine Zigarettenschachtel). 

* Vollgepackt mit modernster Technik, autom. 
Bereichswahl, Datahold, Memoryfunktionen 
und Durchgangsprüfer. 

* Automatische Polaritätsanzeige. 

* Praxisgerecht (in der Sicherheitsfarbe „gelb“!) 
und robust. 


10-Amp.- 
LCD-Digital- 
Multimeter 


„KD-568 Neu! 


, Yellow‘: 


Qualitätsgerät für den 
Einsatz in Schulen, 
Labor, Service, Industrie, 
Kfz-Elektronik und 
Hobby. Sehr gut lesbare 
3%%stell. LCD-Anzeige (10 
mm) mit Meßbereichs- 
anzeige auf dem Display. 
Übersichtliche Bediene- 
lemente mit praktischem 
Drehschalter. 
triebssicherheit, 
Bereichsschutz und Sicherheits-Prüfschnüre. Max. 
Anzeige 1999. Überbereichsanzeige, Batteriezu- 
standsanzeige, eingeb. Pieper für Durchgangstest. 
Versenkte 4-mm-Buchsen. Eingangswiderstand 
100 MN) im Bereich 200 mV, alle anderen Bereiche 
10 MN. Überlastschutz DC 1000 V, AC 750 V. 
BXHXT: 69x127x25 mm. Inkl. Meßkabeln, Batterie 
9 V und engl. Anleitung. Lieferung in Gelb. 


Daten: V=: 200 mV/2/20/200/1000V + 0,8% 
Vrn: 2/20/200/500V + 1,2% 
A=: 20mA/200mA/10A +1,2% 
An: 20mA/200mA/10A +1,2% 
Ohm: 200 N/2/20/200 kN/2 MN 


Best.-Nr. 0605303 


Stromanleger- 
Zange U-91: 


Kontrolle von Strömen 


und Spannungen in 
Installationsanlagen. 
Einhandbedienung, Um- 
schaltung von Strom- auf 

| Spannungsmessung 
ohne Auftrennen des 
Stromkreises. 
Wechselstrom: 
0-10/25/100/250/500 A 
+4% 
Wechselspannung: 
0-300/5600 Vu + 4% 
Abmessungen/Gewicht: 
BxHxT: 94x238x36 
mm/ca.0,6kg 
Zubehör: 
Prüfkabelsatz, Trage- 
tasche, Bedienungs- 

| ‚anleitung. 
Best.-Nr. 


0601888 . nur 79,50 DM 


Preisschlager 


Mini-Multi- 
meter-9120: 
Preiswertes Modell mit 
den gebräuchlichsten 
Bereichen, nicht nur für 
den Einstieg in die Elek- 
tronik. Besonders gün- 
| stige Abmessungen, 
überall und sofort ein- 
satzbereit (BXHXT: 
63x90x33 mm). 


0-15/150/500/1000 V (1kQ/V) 
0-15/150/500/1000 V (1kN/V) 


Inkl. Prüfschnüre, Batterie und Anleitung. 


, Best.-Nr. 0603966 


| BXHXT: 


Hohe Be- | 
voller | 


Analog-Viel- 
fachmeßgerät 
„MAN-X 02": 


Das MAN-X 02 ist leicht 
und nicht größer als Ihre 
Brieftasche, Sehr über- 
sichtliche Einhandbedie- 
nung über Drehschalter 
aller 23 Meßbereiche 
durch farbige Skalen. 
Aufwendiger Überlast- 
schutz mit 1 und 10 Amp. 
Hochleistungssicherun- 
gen. Anzeige einer anste- 
henden Spannung >80 V 
durch Signallampe bei 
defekter Sicherung. 
Stromversorgung 1,5 V 
Mignon (1 Batt. inkl.). 

102x145x42 mm. Mit Sicherheitsmeß- 

kabeln und Ersatzsicherungen. 20000 Q/V= 

V=: 0-0,1/3/10/30/100/300/1000 V 

Vrx: 0-10/30/100/300/750V 

A=: 0-50/1004uA/1/10/100mA/1/10 A 

An: 0-1/10/100mA/1/10A 

Ohm: 0-5/50/5000/10/100 kK0/1MN 


Best.-Nr. 0604796 


Im praktischen Transportkoffer! 


Elektronisches P,-Meter: 


Fertiggerät mit hochwertiger Elektrode. Ein Präz.- 
Meßgerät für die Bereiche: Umweltschutz, Labor- 
technik, Landwirtschaft, Blumenzucht, für den 
Aquarianer u. a. pH: 0-14.00, Tol.: + 1 d, Eingangs- 
wid.: 10°, Asymmetrie-Korrektur, Temperatur- 
Kompensation 0-100 °C, Batt.-Betrieb 9 Volt. LCD- 
Anzeige: 13 mm. Handl. Taschengehäuse, Betriebs- 
fertig mit Batterie, Koffer, Elektrode „made in 
Germany”, gereinigtes Wasser, Pufferlösung PH 
-0,7 + PH 4,0 in Kunststoff-Flaschen mit Dosier- 
schlauch. 

Best.-Nr. 0601566 


Postfach 5320 - 3300 Braunschweig 
Tel. (0531) 8762-111 : Telex 952547 


th en 


Universal-Vakuum-Schraubstock: 


ihnellspannhebel. Spannbacken um 360° drehbar, 
# Backenbreiten 63 und 37 mm, max. 50 mm Spann- 
te. BXHXT: 170x110x110 mm. 


tzlich für jeden Haushalt - Wasserleitungen 
Stromkabel ohne Probebohrungen orten! 


IENKFORCE®- 
angs- und Metallsuchgerät: 
Drtungstiefe max. 90 mm, stufenlos regulierbar. Eine 
ED für beide Suchaufgaben ist eingebaut (ohne 
Nr. 0504467 


it. 9-V-Block (UM-6) 
„Nr. 0311530 


nur 17,50 DM 


versal-Schlagschrauber: 


ehwere, verchromte Ausführung, 30 mm @, Länge 


2 mm. Beim Draufschlagen werden die auswech- | 


aren Einsätze gedreht, einstellbar zum Lösen 
d Befestigen. Bei Bedarf können auch die bekann- 
a 1/2"-Nüsse aufgesteckt werden. 4 Bits mit Klinge 
den mitgeliefert (8+10 mm und Kreuzschlitz Gr. 
+3). Stahlblech-Kassette. 
Best.-Nr. 0502049 


Netz 220 V. Mit ein 
wenig Übung kön- 
nen Frontplatten, 
Instrumente, Gläser 
usw. kunstvoll ver- 
ziert werden. Hand- 
gerät mit Netzschal- 
terund auswechsel- 
baren Spitzen. Kom- 
plett mit gehärte- 
tem HSS-Stichel. 


Zusatz-Stichel für GRAVOMAT: 
zum Aufschrauben, verwendbar für Glas, Stahl, 
Marmor, Keramik. 

10,50 DM 


Automatik-Abisolierzange: 


Selbsteinstellend für Kabel von 0,2 bis 6 mm?. Zusätz- 

licher Kabelschneider. Gesamtlänge: 176 mm. 

Best.-Nr. 0502316 12,90 DM 
ab 3 Stück je 11,50 DM 


Wird immer wieder benötigt... 
2 | Kreis- 
schneider: 


Schneiden 
Hand oder 
Aufsetzen 


von 
durch 
einer 


griff, verstellbar für 
Löcher von 20 bis 
140 mm &, mit 2 


Feinlötkolben: 


Leichte Ausführung für alle elektronischen Arbeiten. 
SCHUKO-Zuleitung, 220 V/25 W. 
| Best.-Nr. 0504500 
ab 3 Stück 
Best.-Nr. 0504519 Ersatzspitze hierzu ... 


Best.-Nr. 0504528 Ersatz-Heizkörper .... 


Bohrmaschine. 2 | 
Schneiden mit ab- | 
nehmbarem Hand- | 


| Lötzinn, 1a-Qualität: 


Leicht-fließendes Elektronik- und 
Elektriker-Lötzinn in Legierung L-Sn 60/40 mit 
Flußmittel 362 (5 Flußmittel-Seelen), 
Schmelzbereich 183-188 °C. 


| Elektronik-Lot 0,7 mm %, 
besonders dünn: 

im praktischen, bleistift-förmigen Spender, Füll- 
menge ca. 6,5 m, besonders dünn 


Best.-Nr. 0505215 
ab5 Rollen 


Elektronik-Lot 1 mm, Wickel ä 1m 
Best.-Nr. 0505224 
ab 5 Rollen 


 Elektronik-Lot 1 mm, Wickelä5 m 


| 


, Schnell-Lötpistole: 120 Watt 


VDE-Lötpistole. Anheizzeit nur ca. 7 Sekunden, 
Leistung 120 Watt. Kein Ständer erforderlich, kann 
liegend oder stehend betrieben werden. Mit einer 
Lampe, die das Löten in vielen Situationen erleich- 
tert. Zuleitung 1,8 m lang. 

, Best.-Nr. 0504966 

Best.-Nr. 0504975 pass, Ersatzspitze .... 

ab 3 Stück 


Netzunabhängig, immer dienstbereit. 


Drahtloser Akku-Lötkolben: 


Mit NiCad-Akkus, Ladung reicht für 250 Punktlötun- 
gen. Ladezeit 10 — 12 Stunden. Eingeb. Arbeitsplatz- 
beleuchtung. Aufheiz-Zeit nur 5 Sec. Löttemp.: 300°, 
12 Watt. Sehr handlich, komplett mit Schutzkappe 
\ für Lötspitze, Ladeteil, Wandhalter, Ständer. 

| Best.-Nr. 0509195 Preissenkung 46,50 DM 
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Akku-Schrauber: 
Wiederaufladbares Schraubgerät mit Vor- und Rück- 
laufstellung. Ladung reicht für 200-300 Stück. 4x8 
| mm-Schrauben. Handgriff vom Gerät trennbar zum 
Erreichen schlecht zugänglicher Stellen. 4 Schraub- 
einsätze (2X Flachklinge, 2X Kreuzschlitz) im Hand- 
griff verstaubar sowie Trageschlaufe und Ladegerät 
220 V/50 Hz. Leerlaufdrehzahl 150 UpM. Dreh- 


| moment max. 3,2 Newton/Meter. Ladezeit max. 


12 Stunden. BxHxT 295x 160x32 mm. 


 Lötstation „Thermotronik“: 


Temperaturregelung von 150-400°. Schnelle Auf- 
heizzeit mit ERSA-Lötkolben TE-40. 220 V/50 Hz, 
Lötkolben 24 V potentialfrei, Leistung: 60 W bei 

| 350 °C, Siliconleitung mit Normstecker 1,3 m lang, 
komplett mit Reinigungsschwamm, Lötständer und 
Ersadur-Dauerlötspitze. 


159,50 DM 


Postfach 5320 - 3300 Braunschweig 
' Tel. (0531) 8762-111 - Telex 952547 


blen mit vier und Strings mit fünf Zeichen begnügen 
könnten. Der Vorteil bei der Siebener-Darstellung 
ist, daß der Rechner bei seiner Suche nach einer Va- 
riablen nur jedes siebte Byte prüfen muß. Feldvaria- 
blen lassen sich nicht in dieses Schema pressen. 
Deshalb benötigen sie einen eigenen Speicherbe- 
reich und nach jedem Variablennamen zwei Bytes, 
die angeben, wo das nächste Feld zu finden ist. Für 
Strings steht in der Siebenergruppe nur der String- 
Deskriptor. Er enthält die Stringlänge und die Adres- 
se der Speicherstelle, an der der Text des Strings zu 
finden ist. 


Variablen dimensionieren 
Mu ET RER TTERR 


Für Variablennamen sind folgende Regeln zu beach- 
ten: 

l. Der Name darf aus einem oder mehreren Buchsta- 
ben oder Zahlen bestehen. Das erste Zeichen muß 
ein Buchstabe sein. 

2. Namen, die aus einem Zeichen bestehen, werden 
intern mit einer Null ergänzt. 

3. Nur die ersten beiden Zeichen werden gewertet. 
4. Variablen, die ein reserviertes Befehlswort enthal- 
ten, werden abgelehnt. Die Anordnung im Speicher 


entspricht stets der Reihenfolge beim Eingeben. 
Wenn eine Variable aufgerufen wird, fragt der Com- 
puter sämtliche im Variablenspeicher vorhandenen 
ab. Häufig benötigte Variablen sollten stets in der 
ersten Programmzeile definiert werden. Beispiel: 
10C=0:A$=""F%=0. 

Viel eleganter ist der Einsatz des DIM-Befehls, die 
wenigsten Programmierer kennen diesen Trick. 
Also mit der CLR-Taste den Bildschirm löschen und 
folgende Programmzeile eingeben: 

0 DIM C,A$,F$. 

Die Variablen liegen jetzt mit Leerwerten im Spei- 
cher vor. Selbst wenn ihnen andere Werte zugewie- 
sen werden, behalten sie ihre Position im Variablen- 
speicher bei. 


Für häufig benutzte Variablen sollten Vorzugsplätze 
in der Variablenliste reserviert werden. Dazu die 
Variablen in der ersten Programmzeile dimensionie- 
ren. 


In der nächsten Folge der PEEK-Show für C16 und 
Plus/4 wird die Zahlendarstellung und die Stringbe- 
handlung im Speicher genauer unter die Lupe ge- 
nommen. 

(Dr. Marie-Luise Beyer) 


POWER CARTRIDGE 


Dank einer neuen, von KCS entwickelten Schaltungstechnik ist es möglich,auch außerhalb des Speichers Ihres 
Commodore 64/128 Programme unterzubringen. Darauf basiert die von KCS entworfene POWER CARTRIDG 
Die leistungsfähige 16KByte-Erweiterung in reiner Maschinensprache bietet Ihnen als Anwender eine optimale 


Ergänzung zum normalen Computer. 


| CITIZEN, PANASONIC usw.) ein 


Ein umfangreiches BASIC-Toolkit (Hilfs- 
befehle zum Programmieren), daß das 
Erstellen und die Fehlersuche in 
Programmen beträchtlich vereinfacht. 


AUTO HARDCAT RENUMBER 
AUDIO HARDCOPY REPEAT 
COLOR H FE 
DEEK 
DELETE 
DOKE 
DUMP PLIST 
FIND ILOAD BLOAD 
RENUMBER : Ändert auch alle GOTO’s, 
GOSUB’S usw. Es ist auch 
möglich, einen Teil eines 
Programmes neu zu 
numerieren oder sogar zu 
verschieben. 
PSET : Einstellen des Druckertyps. 
HARDCAT : Drucken eines Directories. 
Die Toolkit-Befehle können in Ihren 
eigenen Programmen verwendet werden. 


Mit der POWER CARTRIDGE können 
Programme mit 6-facher Geschwindigkeit 
von der Diskette geladen werden. Die 
Floppy- Befehle können in Ihren eigenen 
Programmen verwendet werden. 
DLOAD DWVERIFY DIR 
DSAVE MERGE DEVICE 


MERGE : Zwei BASIC-Programme 


zusammenfügen zu einem 
einzigen Programm. 
: Mit B 
Kommandos an die Floppy 
senden. 


'SK können Sie direkt 


Mit der POWER CARTRIDGE können Sie 
mit der Datasette 10 x schneller arbeiten. 
Die Datasette-Befehle können in Ihren 
eigenen Programmen verwendet werden. 


LOAD SAVE VERIFY 
MERGE AUDIO 


Ein Maschinensprache-Monitor, der 
immer verfügbar ist und Ihnen Zugriff auf 
alle Speicherbereiche Ihres Commodore 
ermöglicht. 


Auch den Speicher unter dem BASIC- 


ROM, unter dem Betriebssystem und 
unter dem I/O-Bereich! 


Tax z<-o 


Die POWER CARTRIDGE enthält ein 
leistungsfähiges Drucker-Interface, das 
automatisch erkennt, ob ein Drucker am 
seriellen Bus oder am Userport ange- 
schlossen ist. 

Es werden alle CBM-Zeichen auf EPSON - 
oder kompatiblen Druckern gedruckt. Das 
Drucker-Interface hat sehr viele 
Einstellmöglichkeiten . 

Es kann sowohl auf seriellen Druckern 
(MPS 801, 802, 803 usw.) als auch auf 
Centronics Druckern (EPSON, STAR, 
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An der Rückseite der POWER CARTRIDGE 


HARDCOPY des Bildschirms gemacht 
werden. 


Beim Hardcopy wird automatisch 
zwischen normalem Text und Hochauf- 
lösender Grafik unterschieden. 
Mehrfarb-Grafiken werden in verschie- 
dene Graustufen umgewandelt. Mit dem 
PSET-Befehl können Sie einstellen, ob die ndet sich ein Reset-Taster. Durch 
en normal, inverse, groß einen Druck auf den Taster gelangen Sie in 
klein gedruckt wird. { ein besonderes Menü. Diese Funktion, 
Die Drucker-Einstellmöglichkeiten sind: ausgelöst durch den Reset-Taster, klappt 

- bei ledem Programm! Auf dem Bildschirm 
PSETO - AutomatischeUmschaltung sehen Sie nun foldende Menüpunkte: 

Seriell oder Centronics. 


PSET1 - Steuert Drucker immer im CONTINUE - Das unterbrochene 
EPSON-Modus an. Programm wird fortgesetzt. 
PSET2 - Steuert Drucker immer im Smith | BASIC - Rücksprung nach Basic. 
Corona-Modus an. RESET - Für normalen Reset 
PSET 3 - Druckt Hardcopy um % Grad ausführen. 
edreht! TOTAL - Rettet den Speicherinhalt 
PSET4 - Hardcopy Einstellung für MPS BACKUP auf Diskette. Das Programm 
802/1526. DISK kann später mit BLOAD 
geladen und mit Continue 
wieder fortgesetzt werden. 
RESET ALL - Führt einen Reset aus jedem 


mm aus. 
TOTAL = Wie BACKUP DISK, aber für 
ya Datasette. 


T 

HARDCOPY- Druckt jederzeit ein 
Bildschirm-Ha y. Das 
Fragen kann mı 
CONTINUE fortgesetzt 
werden. 

MONITOR - Sprung in den Maschinen- 


sprache-Monitor. 


PSETB - Bit-Images-Modus. 

PSET C - Einstellung Groß- oder Klein- 
schreibung und Senden von 
Steuerzeichen. 

PSETT - Alle Zeichen werden ohne 
Umwandlung an den Drucker 

esendet. 

PSETU - Steuert Drucker seriell an und 

läßt den Userport frei. 


PSET $x - Stellt Sekundäradresse für 
Hardcopy auf seriellen-Bus ein. 
PSET L1 - Nach jeder Zeile wird ein 


Lin 
PSET 10 - Schalte PSET LT a0) gesendet 
Zu haben beim 
erg empfohlener, Fachhandel und in den 
a Fachabteilungen der 
Preissenkung 


Warenhäuser 


DIE C64-KLASSIKER. 


Brückmann » Englisch : Felt 
Gelfand » Gerits  Krsmik 


Ein DATA BECKER Buch 


Anfangen und gleich richtig loslegen - das 
wünscht sich jeder, der in die Computerei 
einsteigt. Mit 64 für Einsteiger geht das ganz 
problemlos. Vom Anschluß bis zum ersten 
Programm wird Ihnen dieses Buch immer 
wieder gute Dienste leisten. Alle Themenbe- 
reiche werden systematisch und verständlich 
dargestellt. Aufstellen, anschließen, kennen- 
lernen, das erste Programm - und schon 
kann es weitergehen. 

64 für Einsteiger 

251 Seiten, DM 29,— 


Ellinger - Englisch 
Gelfand - Szczepanowski 


Ein DATA BECKER Buch 


Wer seine 1541 nur mit LOAD und SAVE 
aobspeist, der hat sicher noch nicht das große 
Floppy-Buch gelesen. Denn schon bei der ein- 
fachsten Dateiverwaltung gibt es einige 
Kniffe. Und was halten Sie von einem Super- 
Diskmonitor mit Zugriff auf 40 Tracks, einem 
zeilenweise dokumentierten DOS mit Cross- 
Reference, einem Kapitel über Kopierschutz 
oder Themen wie Direktzugriff, Overlaytech- 
nik? Und natürlich gibt es hier auch alle 
Neuigkeiten über die 1541 C. So macht man 
Standardwerke mit Zukunft. 

Das große Floppybuch zur 1541 

Hardcover, 520 Seiten, DM 49,— 


Das komplette DATA BECKER Angebot - detailliert und 
übersichtlich dargestellt im aktuellen DATA BECKER 


Katalog Winter 86/87. Informieren Sie sich kostenlos, 
fordern Sie den neuen DATA BECKER Katalog an. 


DATA BECKER 


Merowingerstr. 30 - 4000 Düsseldorf - Tel. (0211) 310010 
WWW. KONBSONPUTERWERLB. COM 


Für dieses Buch ist keine lange Vorrede nötig. 
Ein paar Daten zur neuesten Auflage: 5. völlig 
überarbeitete Auflage, 628 Seiten. Auszug 
aus dem Inhalt: Soft-Scrolling, Sprungvektoren 
und Autostart, Illegal-Codes und deren Takt- 
zyklen, zeilenweise kommentiertes ROM- 
Listing, Interruptprogrammierung, der neue 
C64, BASIC-Intern, Original Commodore- 
Schaltpläne. Verabschieden Sie sich von Ihren 
Freunden: 628 Seiten Herausforderung 
warten auf Sie. 

64 Intern 

Hardcover, 628 Seiten, DM 69,— 


Ein DATA BECKER Buch 


Alles Trainingssache - dieser Spruch gilt noch 
immer. Erst recht, wenn es um BASIC geht: 
das BASIC-Trainingsbuch zum C64 verrät 
Ihnen alles über Unterprogramme und Menü- 
techniken, über Bits und Bytes. Aufgaben 
helfen, den Wissensstand zu überprüfen, 
kleine, aber feine Programme sorgen dafür, 
daß die Sache Spaß macht. Natürlich gibt es 
auch eine Einführung in Grafik und Sound. 
Und eine Dateiverwaltung als Abschlußarbeit. 
Das BASIC-rainingsbuch zum C64 

337 Seiten, DM 39,— 


Das ist das auflagenstärkste deutsche Com- 
puterbuch. Warum? Schauen Sie mal rein, 
dann werden Sie verstehen, was zehntau- 
sende von 64er Fans daran begeistert. 
Bubblesort in Assembler, Stereosynthesizer, 
Kopierschutz, GEM-Simulation, Autostart, 
Datenübertragung zu anderen Rechnern — 
und das ist nur ein kleiner Ausschnitt. Sparen 
Sie sich Ianges Suchen - was Sie an Kniffen 
kennen müssen, gibt's in einem Buch. 

64 Tips und Tricks, Band 1 

418 Seiten, DM 49,— 


Einen Kreis auf dem 64er programmieren 
ohne viele Zeilen Listing? Simons BASIC 
macht’s möglich. Einen Kreis auf dem 64er 
programmieren ohne viele Syntax Errors? 
Das Trainingsbuch zu Simon’s BASIC 
macht’s möglich. Hier finden Sie 

schnell alles wichtige klar erklärt. 

Inklusive der „Macken”, die Simon’s 

BASIC in sich birgt, und natürlich 


der Befehle, die man im & 
Handbuch nicht findet. > Kg 
Gründlicher geht‘s nicht mehr, SE 
Das Trainingsbuch zu &$ 


Simon’s BASIC sg 


SORGW/AISCH. en 3 2 ee TRETEN 


Der Trend zu mehr Anwenderfreundlichkeit durch 
Benutzeroberfläche setzt sich mehr und mehr bei 
Homecomputer-Software durch. Drop-down-Menüs, 
noch vor einem Jahr auf dem C64 ein Fremdwort, 
sind heute in keinem professionellen Programm 
mehr wegzudenken. So wurde auch beim „OCP ART 
Studio“ konsequent dieser Weg beschritten und es 
entstand ein Zeichenprogramm, das durch seine Ein- 
fachheit der Bedienung beispielhaft ist. Die Einarbei- 
tungszeit ist minimal und nur selten muß man das 
Handbuch (leider nur in englischer Sprache erhält- 
lich) zu Rate ziehen. 

Das Programm kommt von RAINBIRD und wurde An- 
fang dieses Jahres von Starprogrammierer James 
Hutchby für den Sinclair Spectrum entworfen und 
aufgrund des großen Erfolges jetzt für den C64 um- 
geschrieben. So ist es auch zu erklären, daß nicht 


die speziellen Eigenschaften des C64 ausgenutzt 
wurden, doch dazu später. 

OCP Art Studio läßt sich fast ausschließlich mit Joy- 
stick bedienen. Nur für Eingaben, die Text erfordern 
(z. B. Filename beim Abspeichern, oder auch Text- 
eingabe im Textmodus) muß in die Tasten gegriffen 
werden — man kann sich beim Arbeiten mit dem Art 
Studio bequem in den Sessel zurücklehnen. Alle 
Funktionen sind über Drop-down-Menüs erreichbar. 
Diese sind so gut selbsterklärend, daß auf Hilfsme- 
nüs verzichtet werden konnte. Wem ein Joystick 
zum Zeichen zu ungenau oder zu unhandlich ist, kann 
einen Trackball, ein Koalapad oder eine speziell für 
dieses Programm entwickelte Maus benutzen. Lei- 
der ist diese Maus zur Zeit nur in England erhältlich 
und nicht gerade billig (180 DM). Die Maus ist spe- 
ziell für das Art-Studio entwickelt worden und nicht 
kompatibel zu den bisher für den C64 angebotenen 
Mäusen. Demzufolge sind diese für das Art Studio 
unbrauchbar (jeder kocht mal wieder sein eigenes 
Süppchen und der Anwender kann sehen wo er 
bleibt — oder wer kann sich schon für jedes Pro- 
gramm eine neue Maus leisten?). Positiv sei noch zu 
vermerken, daß Joystick und Koalapad gleichzeitig 
angeschlossen sein können und mittels Tastendruck 
zwischen beiden umgeschaltet wird. 

Beim „OCP Art Studio“ haben sich die Software- 
Schützer mal wieder etwas Neues ausgedacht. Als 
Programmschutz wird ein Gewirr aus graphischen 
Zeichen auf den Bildschirm gebracht. Nur mit Hilfe 
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PrintjFiıe [Attrs [Paint [Hisc [Ungo GI» 
zu at Pasnt [7 Text [Snapes aL_ 14 


Sämtliche Menüs können schnell mittels Menüleiste abge- 


rufen werden 


Das UÜILP 


Aus England kommt ein Malprogramm 
mit besonderen Features: Verschiede- 
ne Farben im HiRes-Modus, Windows 


und Drop-down-Menüs. 


einer mitgelieferten Linse, der sogenannten „LENS- 
LOK", die man vor den Bildschirm hält, läßt sich mit 
Mühe und viel Fantasie ein Code ablesen, der einge- 
tippt werden muß. Zu allem Überfluß hat der Benut- 
zer nur etwa 10 Sek. Zeit zu dekodieren und den 
Code einzugeben: Es wird zwar für einen richtigen 
Cracker keine Mühe sein, diesen Schutz auszubau- 
en, aber für den normalen Benutzer sind diese Kin- 
dereien eine Zumutung! Es soll ja Leute geben, die 
ihren Bildschirm in einiger Entfernung im Regal ste- 
hen haben und es dann nicht schaffen, mit einer 
Hand die Linse krampfhaft an den Bildschirm zu hal- 
ten und mit der anderen den entsprechenden Code 
einzugeben! 


euch! im HiRes-Mode 
Sr? TEEN 233 FRE 


Im ale zu den meisten Malprogrammen die 
verschieden Farben zulassen, arbeitet das Art Stu- 
dio im HiRes-Modus. Die Auflösung eines Bildes be- 
trägt 320 x 200 Pixel, wobei jedem 8 x 8 Pixel großen 
Kästchen jeweils ein Wert für die Vordergrund- und 
ein Wert für die Hintergrundfarbe zugeordnet wer- 
den kann. Mit Einschränkungen kann man dadurch 
sehr gute farbliche Effekte erzielen (siehe auch De- 
mobilder). Man kann die Farben zwar nicht so stark 
variieren wie beim Multicolour-Modus, hat aber da- 
für die größere Auflösung. Unterstützt wird die Kon- 


trolle über die Farbkästchen durch zwei Funktionen, 
die wohl einmalig bei allen bisherigen Zeichenpro- 
grammen sind: Mit SNAP HOR und SNAP VERT kann 
man bei den wichtigsten Funktionen (Texte und Figu- 
ren) erzwingen, daß man immer im Farbraster 
bleibt. Dadurch kann leicht eingefärbt werden ohne 
umliegende Bildteile zu stören. Für das nachträgli- 
che Einfärben steht außerdem noch ein sogenannter 
„leerer Pinsel“ zur Verfügung, der nur die Farbinfor- 
mation verändert, aber keine zusätzlichen Pixel setzt 
oder löscht. 


ee rewn-Men! Üs 


Die gesamte Bedienung des Art Studio geschieht mit 
Hilfe von Drop-down-Menüs, die seit der Verbreitung 
der 16-Bit-Rechner Stand der Technik in punkto Be- 
nutzerkomfort sind. Die Anwahl geschieht dadurch, 
daß man den Cursor in die stets sichtbare Kopf- 
(menü)Zeile auf die gewünschte Funktion führt und 
diese durch Druck des Joystickknopfes „anklickt“. 
Es erscheint dann ein Menü bestehend aus mehre- 


Studio 


Zahlreiche Füllmuster ermöglichen interessante Farbeffekte 


ren Möglichkeiten dieser Funktion. Hier wählt man 
wieder auf die gleiche Weise aus. Zum Teil erscheint 
bei Anwahl eines Menüpunktes ein weiteres Unter- 
menü, das aus Gründen der Übersichtlichkeit je- 
weils leicht versetzt ist. Das bisherige Menü, sowie 
die Titelmenüzeile bleiben jedoch stets sichtbar. 
Möchte man nichts aus einem Menü abrufen, so muß 
man nicht umständlich an irgendeinen Punkt „Ab- 
bruch“ oder „Cancel“ (siehe Atari ST) fahren, son- 
dern nur aus dem Menüfeld herausfahren und dort 
anklicken. Dann werden die Menüs der Reihe nach 
wieder zurückgefahren. Ist ein Befehl angewählt, 
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verschwinden die einzelnen Menüs und Untermenüs 
wieder. Je nach gewählter Funktion ändert sich die 
Form des Cursors. Ist er im Normalfall ein Pfeil (weiß 
auf der Grafikfläche und grau im Menügebiet), so ist 
er beispielsweise bei der Funktion „Pen“ ein Zei- 
chenstift oder bei „Spray“ eine Sprühdose. An Mög- 
lichkeiten bietet sich im Menü so ziemlich alles, was 
der Benutzer braucht. Lediglich die Vielzahl der 
Möglichkeiten ist manchmal etwas verwirrend und 
deshalb einarbeitungsbedürftig. Da gibt es Zeichen- 
stifte mit 16 verschiedenen Breiten und Formen, 
ebenfalls 16 verschiedene Pinsel, die mit Pinseln im 
herkömmlichen Sinn nicht mehr viel gemein haben, 
da sich ihre Form editieren läßt. Als Beispiel sei hier 
nur die Form „Smilie“ genannt. Und nicht zuletzt die 
berichtigte Spraydose, die man in 8 verschiedenen 
Spraystärken einsetzen kann. 

An Formen für geometrische Funktionen gibt es alle, 
aus anderen Malprogrammen bekannte, wie Linien, 
Dreiecke, Rechtecke und Kreise (Ellipsen wurden 
leider vom Programmierer vergessen). Mit verschie- 
denen Optionen wählt man, ob im Pixelraster oder 
im 8x8-Farbraster plaziert werden soll, ob man die 
Form während des Einjustierens sehen kann oder 
nicht. Für alle Funktionen kann man in einem separa- 
ten Attribute-Menü wählen mit welcher Zeichen- und 
Hintergrundfarbe man gerade zeichnet, ob gezeich- 
net oder radiert werden soll und ob ein sogenanntes 
„EXOR" mit dem bestehenden Bildschirminhalt ge- 
macht werden soll (beim Zeichnen werden die vor- 
handenen Punkte umgedreht). 


Text ins Bild gebracht mittels 


Ian Zeichensatzeditor 
Ta 3% = ' 


Sehr vorbildlich ist die Textfunktion: 96 verschiede- 
ne Zeichen stehen zur Verfügung, die mit einem ein- 
gebauten Zeichensatzeditor jederzeit verändert wer- 
den können. Der Zeichensatzeditor ist in jeder Hin- 
sicht anwenderfreundlich zu nennen. Auch lassen 
sich die Zeichensätze jederzeit, sowohl von Diskette 
als auch von Tape laden und abspeichern. Zu An- 
fang hat der Benutzer die Wahl zwischen „Compu- 
ter“ und Standard-ROM, doch kann man sich ohne 
viel Mühe die vielen, für den C64 bereits vorhande- 
nen „alternativen“ Zeichensätze anpassen. Der Text 
kann in verschiedenen Breiten und verschiedenen 
Höhen benutzt werden, also neun verschiedene 
Schriftgrößen. Zusätzlich gibt es noch die Funktion 
„Bold“ (Fettdruck). Wünschenswert wäre vielleicht 
noch OUTLINE gewesen, aber die kann man sich ja 
ohne viel Mühe im Zeichensatzeditor selbst gestal- 
ten. Auch hier kann man den Text wieder wahlweise 
ins Pixel- oder ins Farbraster einpassen, was bei far- 
bigen Bildern sehr entgegenkommt. Doch nun zu 
den Besonderheiten von OCP Art Studio. Da ist zum 
einen die Fill-Funktion, die nur Füllen von Flächen 
mit Farbe (wobei dies rasend schnell und auch bei 
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Cool die Führung übernehmen. 
Mit RUN, dem unabhängigen 
Home-Computermagazin. | 
RUN geht nach vorn: anspruchs- 
volle Listings, Programmiertips 
und Tricks, Kaufempfehlungen : 
auch für Hardware. Aktuelle 
Nachrichten weltweit. Z. B. USA 
und Europa im Vergleich. 
Wertvolle Informationen — mit 
Schwerpunkt C64, 128 und Amig 
RUN im Zeitschriftenhandel. Jedi 
Monat neu und aktuell. Falls 
vergriffen, einfach anrufen oder 
den Verlag schreiben. Wir | 
schicken postwendend ein A 
exemplar — kostenlos. 

RUN. Denn ein Profi kennt sein 
Ziel. 
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Speziell für den Commodore 64/128 entwickelte 
hlagewerk gibt Ihnen 


zentig lauffähige Programme und Hilfsroutinen für 
aft, Technik, Grafik und Sound. Sie erhalten u.a. 
menügesteuerte Tabellenkalkulationsprogramm 
Völlig neuen Anwenderkomfort bietet Ihnen 
Teil 4 enthaltene 

aus sowie 

abgestimm- 

ramme wie 


Programmier- 
und Assembler: 
erhalten Sie 
Diskette einen 


Tips und nützliche Routinen 

Utilities wie ein Interrupt-Manager oder 
auch Ansteuerroutinen für Peripheriege- 
räte werden Ihnen ebenso behilflich sein 
wie raffinierte Grafikroutinen; 


interessante Erweite- 
rungen und Zubehör: 
Teil 7 zeigt Ihnen 
u.a. wie Sie für 
Ihren 64er mit 


EPROM-Modulen 
ein neues 
Betriebssystem 
Schaffen; 


f komplette Bauanlei- 

folgreic tungen incl. Platinen- 
folien 
u.a. die eines 
parallelen IEC- 
Anschlusses (incl. 
Software) oder 
eines Lichtgriffels; 


Ergänzungsausgaben 
zum Grundwerk 

mit neuen nütz- 
lichen Routinen 
und Program- 
men, Intensivkur- 
sen in Sprachen 
wie Logo, Pascal 
und Forth, 
neuentwickelten 
Erweiterungen 
und vieles mehr. 


Fordern Sie noch heute an: 


„Neue Möglichkeiten mit 
dem Commodore C 64/128“ 


strapazierfähiger Ringbuchordner, 
DIN A4, Grundwerk mit über 600 Sei- 
ten, inkl. Assembler-Diskette, Bestell- 
Nr. 3000, für zusammen DM 92,- 


Alle 2-3 Monate erhalten Sie Ergän- 
zungsausgaben zum Grundwerk mit 
jeweils ca. 120 Seiten zum Seitenpreis 
von 38 Pfennig. (Abbestellung jeder- 
zeit möglich) 


Erst prüfen, dann kaufen 


Überzeugen Sie sich bequem zuhause 
von den Vorteilen dieses praktischen 
Hobby-Nachschlagewerkes: Einfach 

die nebenstehende Karte ausfüllen und 
unterschreiben. Ihre zweite Unterschrift 
berechtigt Sie, Ihr angefordertes Werk 
binnen 10 Tagen ab Lieferung an den 
INTEREST-Verlag, Industriestraße 21, 
8901 Kissing, zurückzusenden. Sie kom- 
men dadurch von allen Verpflichtungen 
aus der Bestellung frei. 
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komplizierten Figuren fehlerfrei vonstatten geht), 
sondern auch Füllen mit 32 verschiedenen Grund- 
mustern ist möglich. Dies geht von liniert über ge- 
punktet und schraffiert bis hin zu Dachziegeln, Mau- 
ersteinen und anderen geometrisch hübschen Schat- 
tierungen. Die Füllmuster sind ebenfalls frei editier- 
bar und zum besseren Überblick beim Editieren 
gleich als kleine Fläche sichtbar (damit man die 
Übergänge besser beurteilen kann). Doch nun 
kommt der Clou des Ganzen: Als einziges bekanntes 
Zeichenprogramm bietet Art Studio die Möglichkeit 
beliebige, gerade erstellte Linien, Flächen oder 
auch Schriftzüge mit diesen Füllmustern zu „verwa- 
schen". Das kann man sich so vorstellen, als ob man 
das Füllmuster darüberlegen würde und überall 
dort wo es transparent ist, die Farbe des eben Ge- 
zeichneten wieder wegradieren würde. Diese Effek- 
te lassen viel Raum für Experimente und Kreativität. 
Gerade bei Texten lassen sich so bemerkenswerte 
Effekte erzielen, wenn man den Text einmal verwa- 
schen in den Hintergrund und einmal normal in den 
Vordergrund stellt (Schattenschrift). 

Das zweite bemerkenswerte Menü ist die Window- 
funktion. Ein Window ist eine beliebige rechteckige 
Fläche auf dem Bildschirm (kann auch der gesamte 
Bildschirm sein). Windows kann man jederzeit selbst 
definieren (so wie man ein Rechteck zeichnet). Man 
kann zum einen den Inhalt spiegeln (vertikal und/ 
oder horizontal) invertieren, um jeweils 90 Grad dre- 
hen und an eine beliebige Stelle des Bildschirms ko- 
pieren, verschieben, umcolorieren oder löschen. 
Beim Kopieren oder Verschieben ist wählbar, ob der 
darunterliegende Bildinhalt verlorengeht oder ob 
„transparent“ darüberkopiert wird. Man kann das 
Window darüber hinaus noch beliebig in x- und in 
y-Richtung vergrößern beziehungsweise verklei- 
nern. 


Verschieben und kopieren durch 


definierbare Windows 
REICHERT TEST LEE NETTE 


Der Inhalt wird automatisch umgerechnet. Daß beim 
Verkleinern Details verlorengehen und beim Ver- 
größern die Auflösung sehr grob wird, ist technisch 
nicht vermeidbar. Hier muß der Anwender dann 
schon noch etwas „nachbereiten“. Dazu eignet sich 
am besten der „Zoom“-Modus. Drei (!) verschiedene 
Zoomstärken sind wählbar (2x, 4x und 8x). Dies er- 
möglicht gerade Anwendern, die gerne noch etwas 
herumfeilen wollen ein sehr angenehmes Arbeiten. 
Die geringen Zoomstufen bieten einen guten Über- 
blick und in der höchsten Stufe kann man „aufs Pixel 
genau“ arbeiten. Sehr komfortabel sind auch die 
Fileoperationen. Das zugehörige Menü ist übersicht- 
lich und läßt kaum Wünsche offen. Alle nötigen 
Funktionen wie Formatieren, Umbenennen und Lö- 
schen von Files, Direktoryanzeige sind ebenso vor- 
handen wie Laden und Speichern der Bilder. Her- 
vorzuheben ist hierbei das Mischen der im Speicher 
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befindlichen Grafik mit einem anderen abgespei- 
cherten Bild. Alles wird per Joystick und Knopfdruck 
erledigt, lediglich beim Abspeichern muß der Name 
des Kunstwerks via Tastatur eingegeben werden. 
Nun hat man ein tolles Bild erstellt und möchte es 
ausgeben. Es stehen fünf verschiedene Größen der 
Ausgabe zur Verfügung. Einige sind allerdings nur 
Besitzern von Druckern mit doppelter Dichte vorbe- 
halten. Beim Ausdruck mit doppelter Dichte werden 
die Grafiken verzerrt, wodurch deren Anwendung 
nur in Sonderfällen sinnvoll erscheint. Ein Minus- 
punkt ist das Anpassen der Drucker. Dies geschieht 
in einem separaten Programm. Hier wurde auf Än- 
wenderfreundlichkeit kein großer Wert gelegt, so 
daß man das Installationsprogramm einige Male lau- 
fen lassen muß, bis alles paßt. Es werden sehr viele 
Details vom Anwender erfragt, die selbst „Einge- 
weihten“ ein Stirnrunzeln abverlangen, aber mit „try 
and error" kommt man dann doch zum Ziel. Positiv 
sei vermerkt, daß man praktisch jeden grafikfähigen 
Drucker anschließen kann. Lediglich die Option 
„Druck in Graustufen“, bei der Farben in entspre- 
chende Graustufen umgesetzt werden, ist nur auf 
einigen Druckern möglich. 


Problematische Druckeranpassung 
ERRRET  EREETEEITSET TEETEITELERTTTEN: 


Zu Beanstanden ist, daß das Handbuch nur in engli- 
scher Sprache erhältlich ist. Es enthält eine Menge 
Tips und Tricks für die grundsätzlichen Zeichenfunk- 
tionen, aber viele Anwenderprobleme wurden 
schlicht übersehen. Als Beispiel sei hier nur er- 
wähnt, daß es schon eine gehörige Portion Nachden- 
ken erfordert, bis man eine Lösung für das Problem 
findet: Wie fülle ich eine gefüllte Fläche wieder mit 
„leer“? Nun, man legt ein Window herum, invertiert 
es, und füllt dann die Fläche und invertiert wieder 
das Window (ganz schön kompliziert). 

Auf der Diskette befindet sich übrigens noch ein Bei- 
spielprogramm, mit dem man die erstellten Bilder in 
eigene Programme einbauen kann. Hier bietet sich 
zum Beispiel Videofilmern eine einfache und doch 
gute Möglichkeit für das Erstellen von Vorspannbil- 
dern. Auch Anwender, die gerne ein Titelbild für ihr 
gerade geschriebenes Programm suchen, haben so 
eine einfache und doch elegante Möglichkeit. 
Schade ist, daß man nur eine Bildschirmseite beim 
Erstellen hat. Eine zweite (oder gar eine dritte) Bild- 
schirmseite bei 64k Speicher doch durchaus möglich 
sein kann. Doch nach Auskunft der Entwickler soll 
eine erweiterte Version erscheinen. Wer sich be- 
reits mit Malprogrammen beschäftigt hat, die in der 
Multicolor-Auflösung des C64 arbeiten, wird sich mit 
dem Art Studio anfangs schwer tun. Einfärben im 8 
mal 8 Pixel-Abstand ist nicht einfach. Um interessan- 
te Grafiken zu erstellen sollte man auf die deffinier- 
baren Fällmuster nicht verzichten. 

Alles in allem ist das OCP Art Studio ein Zeichenpro- 
gramm, das man wärmstens weiterempfehlen kann. 
(Kurt Helm) 


Eine Million 
Brockasten 


Fans, Fachhändler und Fachjournalıi- 
sten feierten den Millionsten C64. 
Schauplatz war das BUW-Museum in 
München. „64er“, und „RUN“ brach- 
ten ein gemeinsames Blatt heraus. 


Alles drängt sich um den heiligen Nikolaus: Er verschenkt 
goldene Computer von Commodore 


Dietmar Eirich, Computerbuchverfasser und Fern- 
sehmoderator betätigte sich zum Millionenfest im 
BMW-Museum als Kabarettist von hohen Graden. 
RUN-Chefredakteur Manfred S. Schmidt, verkleidet 
als Nikolaus, verschenkte mit Engel Siggi Pesch die 
vergoldeten C-64 „Brotkästen“ mit den Nummern 
1.000.001 bis 1.000.150. Entgegen sonstiger Gewohn- 
heit arbeiteten die konkurrierenden Zeitschriften 
‚Happy-Computer“, „64er“ und „RUN“ zusammen 
und brachten eine gemeinsame Zeitung heraus. Hier 
einige Auszüge: 

Zweite Talkrunde im BMW-Kino: Barbara Dieck- 
mann bittet Dr. Achim Becker (Düsseldorf) sich vor- 
zustellen. Dr. Becker: „Ich bin mit Commodore groß 
geworden“. Harald Speyer unterbricht: „Wenn wir 
schon von Großwerden, Kinderkriegen sprechen, 
muß ich sagen, Sie sind aber oft fremdgegangen‘! 
Winfried Hoffmann: „Es wird nötig, einen weiblichen 
Homecomputer rauszubringen!“ Brigitte Merkel (Sie- 
gerin Jugend forscht): „Ich bin beim Programmieren 
immer wieder durch Schularbeiten und Lernen un- 
terbrochen worden‘. „Kein Umsatz, keine Sorgen“, 
Hans Lorenz Schneider (33, Computerschriftsteller). 
Dagegen Gerold Hahn (Pressesprecher Commodo- 
re): „Lieber mehr Sorgen!" Weisheit: Vergleichende 
Handbuchforschung hat zu dem Ergebnis geführt, 
das heavy-duty-enduser, sich entweder genau ans 


Handbuch halten oder irgendwann einmal den Com- 
puter verstehen. Frage von Manfred S. Schmidt an 
einen Gast: „Was haben Sie dazu zu sagen?" 
„Wozu?“ „Das ist mir wurscht, Hauptsache es sind 
17 Zeilen!" Spektakulärer Start mit Martin Wimmer: 
Der Rennfahrer (Yamaha) fuhr mit einer K 100 ins 
BMW-Kino zur Diskussion mit Heinrich Sauer (Auto 
Motor Sport) und Dr. Erich Häußer (Patentamt). Mo- 
deratorin Barbara Dieckmann: „Das ist zwar nicht Ihr 
Auftritt Al Mundy aber trotzdem willkommen“. Die 
erfolgloseste Teilnehmerin der Veranstaltung war 
die Zigaretten-Ausdemmundnehmerin Kareen Stein- 
brecher (23). Sie war um 21.20 Uhr immer noch mit 
einem zum Aschenbecher degradierten Champag- 
ner-Kübel durch die Räume unterwegs. 


Winfried Hoffmann, Commodore-Boß Deutschland, hielt 


die Begrüßungsrede: kurz und schmerzlos 
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Database — und 
ihre Bookware 


Wissen ist Macht! wußte schon 
der verblichene Francis Bacon (+ 
1626). Grammatikalisch ver- 
murkst, gleichwohl zutreffend, die 
moderne, vom Zeitgeist ange- 
machte Graffito-Version: Nicht 
wissen macht was! (* 1986). Und 
das wiederum ist letztlich nichts 
anderes als die verkalauerte 
Okonomen-Erkenntnis, daß die In- 
formation zur vierten — und künf- 
tig dominierenden — Produktiv- 
kraft geworden ist. Auch klar: Um 
Informationen wissenschaftlich 
oder wirtschaftlich verwertbar zu 
machen, müssen sie zuvor wohl- 
geordnet (in einem Computer) the- 
sauriert werden. So entstehen Da- 
tenbanken. Geringer Zeitaufwand 
bei Logon und Retrieval, ein im- 
menses Info-Volumen (bis zu einer 
Million Files und mehr), relativ ge- 
ringe Kosten — kein Aspekt, bei 
dem die elektronischen Info-Pools 
Archiven aus Papier oder Pappe 
nicht haushoch überlegen wären 
(und deren Kunden ihrer Konkur- 
renz). Etwa 3000 sind es weltweit 
zur Zeit, die online, das heißt von 
jedem Nutzungsberechtigten mit- 
tels PC über Telefon- und Daten- 
netze angezapft werden können. 
In den USA bereits ein boomen- 
der Milliardenmarkt, in diesem 
unseren Lande noch immer eine 
Marginalie — der Nachholbedarf 
ist enorm! Ob und welche Hilfe- 
stellung die fleißig produzierte 
flankierende Bookware dazu bie- 
tet, war zu prüfen. 

(l) Host On Line (Untertitel: Mit 
dem PC an Datenbank und Mail- 
box) ist der Descriptor eines Büch- 
leins, das (fast) alle Hard- und Soft- 
wareaspekte beim Anschluß von 
Microcomputern an Großrechen- 
anlagen abdeckt beziehungswei- 
se schwerpunktmäßig auf die se- 
rielle, asynchrone Datenfernüber- 
tragung über Schnittstellen nach 
V.24/V.28 beziehungsweise 
RS232C eingeht. Was das en de- 
tail heißt, deutet schon das Inhalts- 
verzeichnis an: Die Rolle des Be- 
triebssytems, die Hardwarever- 
bindung, Statusfragen, Protokoll, 
Handshake und Filetransfer, Ter- 
minalemulation und anderes. 
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Dazu präsentiert der Autor dut- 
zendweise praktische — in Turbo 
Pascal geschriebene — Testpro- 
gramme. Deren Clous sind be- 
kanntlich: Lesbarkeit, Logik, 
Schnelligkeit, die Möglichkeit der 
maschinennahen Programmie- 
rung (bei Bedarf), Direktaufrufe 
des Betriebssytems sowie Porta- 
bilität. Für Freaks und Hinter-die- 
Kulissen-Kieker eine lohnende 
Lektüre! 

(2) Mehr auf den rein Anwender- 
orientierten Markt zielt das Buch 
Online Datenbanken. In unfreiwil- 
lig selbstironischer Weise einge- 
leitet durch good-old Goethe 
(„Daß ich nicht mehr mit saurem 
Schweiß — Zu sagen brauche, was 
ich nicht weiß ...“, Faust ]), be- 
ginnt es mit der üblichen Auftei- 
lung in Referenz- und Quellen-Da- 
tenbanken, beschnuppert dann 
das Thema „Datenbankproduzen- 
ten" und stellt in einer nicht unbe- 
dingt repräsentativen Auswahl di- 
verse Datenbankanbieter (Hosts) 
vor. Weitere Kapitel enthalten 
Wissenswertes zu den Themata 
Öffentliche Datenübertragungs- 
netze sowie Hard- und Software. 
Reichlich lässig wird schließlich 
das Thema „Recherche/Retrie- 
valsprache" abgehandelt — der 
„Dollpunkt“ aller Datenbankab- 
fragen! Negativ formuliert läßt 
sich das auf folgenden Nenner 
bringen: Wer falsch fragt, findet 
nur Nonsense! So logisch und lok- 
ker, wie das nun wiederum klingt, 
so leichtfertig wird es aber oftmals 
wegdiskutiert. Denn die Query- 
Languages sind stärker miteinan- 
der verwandt als der Autor wahr- 
haben will. (Und sie wandeln sich 
auch nicht so schnell, wie er uns 
das unterjubeln will.) Wenn die- 
ser reinrassige Unfug in einem oh- 
nehin (mit 199 Seiten) mageren 
Manual dann auch noch mit der 
Gefahr begründet wird, anson- 
sten den Buchumfang zu „spren- 
gen‘, weiß man, woher da der 
Wind weht. Übrigens: Der gleich- 
namige Komponist hat tolle Musik 
gemacht... 

(3) Eine Menge verspricht der Ti- 
tel, viel davon hält das Folgende, 
nur dem Neugierigen im an- 
zapfenden Database-Business 
bringt's per saldo wenig. Von 


James Martin’'s Einführung in die 
Datenbanktechnik ist die Rede. 
Über Online-Datenbanken erfährt 
man da so gut wie nichts! Selbst- 
gestrickte sind sein Thema! In ge- 
legentlich weitschweifiger, immer 
aber höchst kompetenter Weise 
referiert der Autor da in den vier 
Teilen des Buches über den Nut- 
zen von Datenbanken („War- 
um...?), über „Datenorganisa- 
tion“, über „Datenbank-Software" 
und die zumeist damit sowohl in 
Zusammenhang stehenden wie 
notwendigen „Management- 
Überlegungen“. Phantastisch für 
Systematiker, für File-Program- 
mierer und Info-Manager. Für den 
normalen Online-Freak: Ein tota- 
ler Flop! 

(4) „Wie benutze ich eine Daten- 
bank“ heißt der neueste Titel des 
selbsternannten Ober-Gurus der 
DB-Szene. (Zwar fehlt da das nöti- 
ge Fragezeichen, aber dafür wird 
man mit dem charaktervollen Kon- 
terfei des Autors konfrontiert. Das 
muß man von den im gleichen 
Verlag publizierten Politiker-Por- 
träts kopiert haben. Immerhin: 
Hinter fast jeder Stirn befindet 
sich bekanntlich ein Hirn, und das 
ist eine „biologische“ Datenbank 
mit etlichen Millionen Files.) First 
impression — worst impression? 
No Sir, the second! Denn Lektor 
und Verlag zielen damit ganz un- 
geniert auf die Konsumenten, de- 
nen der legere Umgang mit dem 
prallgefüllten Portemonnaie ver- 
trauter ist als der kritische Blick 
auf den — hinter der Schweißfolie 
verborgenen — Klappentext. Da 
nämlich, wenn auch zu spät, er- 
fährt der lüsternde Leser freundli- 
cherweise, das er sich vergriffen 
hat: Das Management einer Da- 
tenbank — davon handelt das 
Buch, und das Versprechen wird 
auch einigermaßen gut eingelöst. 
Dem Neugierigen am Netz 
bringt's dagegen wenig! 

(5) Ähnlich angelegt ist Gerd 
Quiels Buch Datenbanksysteme. 
Erfreulich: Das Kapitel über „Da- 
tenorganisation und — Strukturie- 
rungen". Wer die entsetzlich-sprö- 
de Schreibe ignoriert, kann auch 
von einigen Seiten über „Daten- 
bankabfragesprachen“ profitie- 
ren. 


/R WEGWEISER FÜR DIE 6BODDER-WELT 


Ausführliche Informationen über 
Amiga, Atari ST und Macintosh. 
Objektive und aussagekräftige Tests, 
verbunden mit umfangreichen Markt- 
übersichten. So gründlich, aufwendig 
und umfassend, wie es Ihnen nur ein 
starkes Team von Fachleuten bieten 
kann. Nutzen Sie dieses Know-how 
für sich. 


Information hat einen Namen: ICON 


Ihre starke Verbindung zur Computerwelt 
Postfach 40 04 29, D-8000 München 40 ER oz SE o 
Se IR 


Bücher 


(6) Eine sehr akadamische, zuwei- 
len auch didaktisch-erstklassige 
Einführung in Sachen Informa- 
tionssysteme und Datenbanken 
bietet Züri-Prof Zehnder. Hilfrei- 
ches Material für angehende In- 
formatiker & DB-Profis! 

(D Onliner lieben die Düsseldor- 
fer Handelsblatt-Gruppe. Denn 
neben renommierten Printmedien 
für Manager und ähnlichem pro- 
duzieren die Profit-Profis nämlich 
auch eine Datenbank-Palette der 
Sonderklasse, GENIOS genannt 
(mit; Zugriff auch über Btx!). Und 
das alles ohne die Subventionen, 
die bei anderen Hosts — so 
scheint's — eher als Sedativum ge- 
wirkt haben! Von einem HB-Toch- 
terbetrieb wurde „Die Nutzung 
von Datenbanken“ (eine Einfüh- 
rung in die Praxis der elektroni- 
schen Recherche) publiziert. Daß 
da das Bundesforschungsministe- 
rium mit einer Modellversuch-Fi- 
nanzierung nachgeholfen hat, ist 
freilich kein Argument gegen die- 
ses Recherche-Manual, das in 
möglichst vielen Regalen stehen 
sollte! Wer das Know-how dieses 
Buches mit den aktuellen Helps 
der Hosts verknüpft, hat die (inoffi- 
zielle) Gesellenprüfung der Info- 
Branche schon in der Tasche. 

(8) Ohne Englisch geht bekannt- 
lich nix in der Computer-Branche, 
für den Database-Bereich gilt das 
gleichermaßen (Ausnahmen be- 
stätigen die Regel). Guten Gewis- 
sens kann man daher dieses phä- 
nomenale anglophone Buch emp- 
fehlen. Eine Conditio...., Klasse! 
Nicht der Hauch einer Chance für 
hochmütige Anmerkungen eines 
Rezensenten, dem ohnehin schon 
die Superlative ausgeht... 

(9) Ausschließlich Produkte made 
in Germany präsentiert das Ver- 
zeichnis deutscher Datenbanken, 
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Datenbank-Betreiber und Infor- 
mationsvermittlungsstellen“. Als 
verantwortlicher Herausgeber 
zeichnet die Gesellschaft für Infor- 
mation und Dokumentation (GID), 
und die bürgt für solides Know- 
how. Knapp, aber präzise werden 
da die Pools aufgeschlüsselt nach 
Datenbasishersteller, Datenbank- 
anbieter beziehungsweise -Betrei- 
ber, Retrievalsystem, Benutzer- 
kreis, Dokumentationsart, Sachge- 
biete, Sprachen, ausgewertete 
Quellen, regionale Abdeckung, 
zeitliche Abdeckung, Gesamtbe- 
stand, Speicherzuwachs/Jahr, Up- 
dating, gedruckter Dienst und 
spezifische Besonderheiten. Im 
Hauptteil II — nach 11 Kriterien 
geordnet — führt der Führer 23 
bundesdeutsche Datenbank-Be- 
treiber (Hosts) auf: Zuständigkei- 
ten, die jeweilige Palette, An- 
schlußzeiten und -möglichkeiten, 
kurzum: deren gesamtes Dienst- 
leistungsspektrum. Ergänzt wird 
das Kompendium durch ein um- 
fassendes, örtlich gegliedertes 
Verzeichnis der Informationsver- 
mittlungsstellen. Besser bekannt 
sind diese Info-Moderatoren unter 
dem Stichwort „Broker“ — d.i. ein 
Beruf mit Zukunft, dem freilich bis- 
her noch jede „Kontur“ fehlt. Ver- 
schiedene hilfreiche Register 
komplettieren diesen Band, der 
eigentlich nur ein Manko aufweist: 
Ihm fehlt's (derzeit noch) an der 
unerläßlichen Aktualität! Denn in 
dem Markt dominiert, reüssiert, 
wie in keinem anderen, die blitz- 
schnelle Anpassung an neue Ge- 
gebenheiten. Für den reichlich 
schwerfälligen Buchmarkt ein 
echtes Problem! 

(10) Zum stolzen Preis von 260 
Mark war das Handbuch der 
Wirtschaftsdatenbanken 1986 auf 
dem Markt (an der 87er-Edition 


wird schon mit heißer Nadel ge- 
strickt). Es ist mittlerweile vergrif- 
fen, und das wiederum läßt Rück- 
schlüsse zu auf die enorme Nach- 
frage und die — kein Wunder — 
defizitäre Wettbewerbslage oder 
Preiselastizität. Hoppenstedt, ein 
renommierter auf Unternehmens- 
daten spezialisierter Verlag, 
wird's wohl noch rechtzeitig mer- 
ken. Der Scientific Consulting Dr. 
Schulte-Hillen freilich, die das Ma- 
terial zusammengestellt hat und 
allen Insidern hinreichend be- 
kannt ist, ist wenig vorzuwerfen: 
Das ist eine solide und (fast) voll- 
ständige Arbeit. Wer's kaufen 
kann, ist klüger! 

(11) Vom gleichen Lieferanten 
stammt „Der schnelle Draht“, ein 
Handbuch zur Nutzung von Daten- 
banken für die technische Ent- 
wicklung“ — so der Untertitel. 
Herausgegeben vom Technolo- 
gie-Minister des populationsmä- 
ßig größten Bundeslandes (NRW) 
und nun, nachdem es zunächst 
gratis offeriert wurde, für zwei 
kleine Scheine beim VDI-Verlag 
zu erwerben ist, bietet der Band 
superbe Informationen für die 
Freaks der einschlägigen Bran- 
che! Hervorragend: Die Gliede- 
rung! Zwar fehlt auch da manches, 
aber billiger geht's nimmer! 

Auf den Gedanken, den Daten- 
banken-Überblick per Datenbank 
anzubieten, sind einige Hosts na- 
türlich auch schon gekommen. 
Die Guides gibt's sozusagen als 
Softcopy auf dem Bildschirm-Ter- 
minal. Und die Europäische Ge- 
meinschaft, den meisten eher be- 
kannt als größte Agrarsubven- 
tions- und Lebensmittelvernich- 
tungsmaschinerie der Welt, ne- 
benbei auch Betreiber des Hosts 
ECHO in Luxemburg, bietet mit 
der Datenbank DIANEGUIDE ein 
aktuelles, vollständiges und ko- 
stenloses (!) Verzeichnis aller eu- 
ropäischen Datenbanken an. Ei- 
nen weltweiten Überblick erhält 
der Interessierte über die Data- 
base of Databases (Host: DIALOG). 
Eine 234-Seiten-Bibliografie zum 
Thema und seinen Randberei- 
chen erhält kostenlos, wer die 
Messe Frankfurt GmbH freund- 
lich anschreibt. 

(Reiner Uhl) ne F7 


Heimcomputer sind nicht nur für Bal- 
lerspiele da. Was dem Einen sein 
Textprogramm ist, ist dem Anderen 
sein Kochrezeptearchiv. Elektronik- 
bastler steuern mit dem C'64 selbstge- 
baute Modellfahrzeuge. 


Die verbliebene Ladefläche dient nun der Aufnah- 
me von Elektronik und Stromversorgung. 

Der Schaltplan (Bild 3) zeigt die drei Baugruppen: 
Stromversorgung, Leistungsstufe und Taktgenerator. 
Die Anschlußbelegung des Userports zeigt Bild 4. 
Die Elektronik benötigt eine geglättete, konstante 
Gleichspannung von 5 Volt. Elektromotore sind nicht 
so anspruchsvoll, sie begnügen sich mit ungeglätte- 
ter Gleichspannung zwischen 5 und 8 Volt. Als Ver- 


€64 als 
Panzerfahrer 


Bild 1: Das fertige Fischertechnik-Kettenfahrzeug 


Der Userport des C64 stellt die Verbindung zur Au- 
ßenwelt dar. Mit seinen 24 Anschlüssen bietet er ge- 
nügend Ausgänge zur Gerätesteuerung. Anhand un- 
seres Fischertechnik-Modells lernt der Bastler wie 
der C64 als Steuerungscomputer eingesetzt wird. 
Vierrädrige Fahrzeuge haben im Vergleich zu Ket- 
tenfahrzeugen einen großen Wendekreis. Autos 
gleichen diesen Nachteil durch ein Wechselrich- 
tungsgetriebe mit Vorwärts- und Rückwärtsgängen 
aus. Änders bei einem Kettenfahrzeug: Die Laufket- 
ten müssen in entgegengesetzter Richtung drehen, 
um das Fahrzeug auf der Stelle zu wenden. Ohne ein 
aufwendiges Getriebe wäre das nicht möglich. Einfa- 
cher ist es nur eine Laufkette zu bewegen und die 
andere im Stillstand zu belassen. Das Fahrzeug dreht 
sich dann ebenfalls, benötigt jedoch einen größeren 
Radius. 

Der Panzer-Buggy (Bild 1) wurde zunächst mit Hilfe 
des Fischertechnik-Konstruktionssystems aufgebaut. 
Dann wurden auf einer Grundplatte zwei Minimotore 
mit Getriebe und Kettenlaufwerk befestigt (Bild 2). 
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sorgung eignen sich entweder Netzteile oder Batte- 
rien. 

An Pin 2 des Userports liegen 5 Volt vor, belastbar 
mit maximal 100 mA. Das reicht für die Elektronik. 
Wer auf Nummer Sicher gehen will, sollte sich ein 
getrenntes 5-Volt-Netzteil beschaffen. Eine solche 
Schaltung zeigt Bild 5. Der Stabilisator, sowie die 
nachstehend beschriebenen Baugruppen sind im Fi- 
schertechnik-Elektronikkasten enthalten. 


Fahrzeug am heißen Draht 


Eine direkte Verbindung eines Motors mit dem User- 
port würde den sicheren Tod des C64 bedeuten. Die 
Stromstärke reicht nicht aus und muß verstärkt wer- 
den. Dafür sorgt ein Leistungstransistor vom Typ TIP 
110 (Bild 6). Zwei solche Leistungsstufen sind eben- 


Bild 2: Die Anordnung der Antriebsmotore 


alls im Elektronikkasten von Fischertechnik enthal- 
ten. Sie dienen zur Ansteuerung des rechten und lin- 
en Fahrmotors. 

Bei den ersten Versuchen zur Aufzeichnung und 
Wiedergabe des Weges trat das Problem auf, daß 
das Unterprogramm zur Aufzeichnung des gefahre- 
en Weges eine längere Durchlaufzeit hatte als das 
Programm zur Ausführung. Wenn Zähl-Schleifen zur 
Bestimmung des Weges eingesetzt werden, ergibt 


Bl altbil El 


sich eine grobe Verfälschung des Kurses. Ein Bei- 
spiel: Eine gerade Strecke, die in vier Sekunden 
durchlaufen wird, benötigt bei der Aufzeichnung 
etwa 1000 Zähldurchläufe. Bei der Ausführung lau- 
fen 1000 Schleifendurchgänge jedoch in drei Sekun- 
den ab. Dies hat zur Folge, daß sich die zurückzule- 
gende Strecke auf 3/4 verkürzt. 

Die Lösung des Problems erforderte einen gemein- 
samen Zeitmaßstab, sowohl für die Aufzeichnung, als 
auch für die Wiedergabe. Ein Multivibrator (Bild 7, in 
der Fischertechnik Elektonik-Baugruppe enthalten) 
erzeugt eine Impulsfolge von Low- und High-Pegeln 
entsprechend Bild 8. Die Frequenz der Impulsfolge 
ergibt sich aus den Werten des aufgesteckten Kon- 
densators und Widerstands. Außerdem läßt sich die 
Frequenz am Regler des Bausteins einstellen. Aufje- 
den Fall ist sie unabhängig von den im Computer ab- 
laufenden Vorgängen. Das Signal wird dem User- 
port an Anschluß PB2 zugeführt. Durch Abzählen ei- 
ner bestimmten Anzahl von High-Impulsen kommen 
das Aufzeichnungs- und Ausführungsprogramm zu 


gleichen Zeitwerten. Nebst Hardware ist noch Soft- 
ware nötig (Listing 1). Das Hauptprogramm erzeugt 
ein Menü, über das die benötigten Unterprogramme 
aufgerufen werden. 

Unterprogramm „Steuern“ (Zeilen 100 bis 410): Diese 
Subroutine steuert das Fahrzeug. Gleichzeitig zeigt 
eine Tabelle an, wie viele Schritte und in welche 
Richtung sie gefahren wurden. Zuerst wird der User-- 
port initialisiert. Danach springt das Programm in 
eine Schleife zur Abfrage der Joystickstellung und 
wandelt sie in die zugehörigen Motorsignale um. Joy- 
stick nach vorne bedeutet Vorwärtsfahrt. Hierzu 
werden beide Motore des Fahrzeugs in Gang ge- 
setzt. Joystick nach rechts leitet eine Rechtskurve 
ein, nur der linke Motor läuft. Umgekehrt verhält es 
sich bei einer Linkskurve. 


Mit Feuer ins Hauptmenü 
ERTEILT TEE 


Durch Betätigung der Feuertaste gelangt man ins 
Hauptmenü zurück. Im Falle einer Fahrbewegung 
wartet das Programm, bis ein „1“-Impuls am Taktge- 
nerator vorliegt. Trifft dies zu, werden die Motoren 
für diese Zeit aktiviert, indem das zugehörige Signal 
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Bild 4: Userportbelegung 
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Autorisierte 
Star-Fachhändler 
stehen zu ihrem Service - 
unter Garantie! 


Lassen Sie sich nicht einfach von jedem x-beliebigem Händler einen Drucker 
verpassen. Mit Billigprodukten aus der Grauzone stehen Sie im Garantiefall im Regen. 

Die autorisierten Star-Fachhändler dagegen verfügen nicht nur über das nötige 
Know-how, Ihr spezielles EDV-System zu vervollständigen, sie allein bieten neben der 
qualifizierten Beratung auch den fachgerechten Service für die gesamte Star Drucker-Palette. 

Und nur die von uns sorgfältig ausgewählten, nachweislich autorisierten Star-Fach- 
händler bieten die volle Star-Garantieleistung - das zahlt sich für Sie aus. Mit promptem 
Service und ohne komplizierte Versandaktionen. Star-Qualität ist ablesbar: an der Original- 
Seriennummer auf dem Typenschild. Nur Drucker mit diesem Typenschild unterliegen den Star 
Garantiebestimmungen und sind FTZ zugelassen. Das erspart Ihnen teure Nachprüfungen. 
Übrigens: zu einem in Deutschland gekauften Star-Drucker gehört selbstverständlich ein 
kostenloses deutsches Handbuch. 

Achten Sie also nicht nur auf das Star-Fachhändler- und Service-Center-Zeichen, 
achten Sie auch auf das Typenschild. Nur dann ist gewährleistet: Mit einem Star ist alles klar. 
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6680 Neunkirchen 
Shop 64 (068 21) 23713 
6730 Neustadt/Weinstr. 
ICR (06327) 390 

6740 Landau 

Computer Software Vertrieb 
(06341) 86014 

6750 Kaiserslautern 

Jung, Alles fürs Büro 

(0631) 53566-0 

Kirch Computersysteme 
(0631) 29022 

6790 Landstuhl 

Computer Point 

(063 71) 18866 

6800 Mannheim 
Computer-Center am Hbf 
(06 21) 20983 

Dialog (0621) 2 er 54 
Phora-Wessendorf 

GmbH &Co. KG (06221) 4661 
6831 Plankstadt 

Geosoft (06202) 25980 
6832 Hockenheim 

G-DAS Datenservice GmbH 
(06205) 4011 

6980 Wertheim 


Roth Elektronik (09342) 8129 


6900 Heidelberg 
Jacom Computertechnik 
(06221) 410514 


Postleitgebiet 7000 
7000 Stuttgart 
Dontenwill (07 11) 234665 
Kübler Büro + Datentechnik 
(07 11) 610651 


7032 et n in 


Autorisierter 
Star-Fachhändler 


7060 Schorndorf 
CSB Computer Systeme 
(07181) 3122 

7107 Neckarsulm 

GAI (07132) 37188 

7140 Ludwigsburg 

GCA (07141) 90048/49 
7150 Backnang 
Micro-Computer-Studio 
(07191) 62051 

7170 Schwäbisch Hall 11 
D.O.S. Computer Systeme 
(0791) 51736 

7274 Haiterbach 

GCA (074 56) = 32 

7317 Wendling: 


GK-Elektronik ik (07024) 51848 


7417 Pfullingen 
Rehm Computersysteme 
(07121) 74436 
7470 Albstadt 
Mattes Computersysteme 
(074 32) 13316 
7475 Meßstetten 1 
Scheurer Kern 61280 
7480 Sigmaringen 
Soft & Easy (075771) 12483 
7500 Karisruhe 
Papierhaus Erhardt 
(07 21) 239 25/27 

7520 Bruchsal 
Hifi Video Computer Jöst 
(07251) 103091 
7527 Kraichtal 
D+G Computertechnik 
(07250) 8684 
7530 Pforzheim 
Bürocentrum Pforzheim 


nik (07231) 13939 


SERVICE-CENTER 


7550 Rastatt 
Bürotechnik Rieger 
(07222) 35085 

7600 Offenburg 

Mangei Büromaschinen 
(0781) 70814 

7700 Singen 

Tröndle Elektronik 
(07731) 64433 

7730 VS-Schwenni 
BUS-Computertechnik 
(07720) 380 71 

7740 Triberg 

RCO Kurt Braun 

(077 22) 5353 

7750 Konstanz 
Elektronik Obser 
(07531) 22929 

7835 Tenningen 
EDV-Service Fell 
(07641) 1058+1059+ 1011 
7851 Binzen 

Resin Büro mit System 
(07621) 66010 

7880 Bad Säckingen 
Dontenwill (077 61) 3093 


(07751) 30 94 

7900 Ulm/Donau 
Computer Studio Wecker 
(07 31) 28076 

7920 Heidenheim 

das büro (07321) 44015 
7980 Ravensburg 
Computer Grahle 

(07 51) 15955 

7987 Weingarten 
Büroorganisation Weiß 
(07 51) 43080 


8000 München 
A.C.O. Computer Systeme 
(089) 7140905 


der CGomputerDrucker 


8000 München 

Dontenwill (089) 5987 01 
Ludwig Bürotechnik 

(089) 3113066 

Saturn Hansa (089) 510850 
Seemüller (089) 596667 
Söllner Datentechnik 
(089) 7607061 
Systemhaus Piper & Partner 
(089) 8340001 

Stubner Computer Vertrieb 
(089) 5197-0 

8051 Palzing 
ECD-Computertechnik 
(08167) 8480 

8070 Ingolstadt 

Büro Wenger (0841) 65021 
8121 Polling 

ABS Computerland 

(0881) 34 31 

8170 Bad Tölz 
Elektronic-Center 

(08041) 41565 

8130 Starnberg 
Computershop McMicro 
(08151) 13888 

8220 Traunstein 
Computer Studio Friedrich 
(0861) 14767 

8229 Laufen 

Wendisch Computer 
(08682) 1600 

8230 Bad Reichenhall 
Rubertigau Bürosysteme 
Angerer (08651) 3016 
8300 Landshut 

Büro Dallmer (0871) 21062 
8340 Pfarrkirchen 

CLG Computerdienst für 


Landwirtschaft und Gewerbe 


(08561) 6022 

8391 Perlesreut 

Eschcomp-System Com- 
puter + Electronic Vertrieb 

7 8555) 1390 

8395 Hauzenberg 

Computer Shop 

(08586) 2174 


Regensburg 
C-Soft (0941) 83986 
EPA Unternehmensberatung 
(0941) 45058 
8500 Nürnberg 
Habermann & Harder 
(09 11) 37183 
8620 Lichtenfels 
H.O, Schulze (09571) 1088 
ee Kulmbach 

Büro + Datentechnik 

(082: 21) 65626 
Hippolyt Thum Büroorg. 
(09221) 64640 
8670 Hof 
Hanft Kopiertechnik 
(09281) 86389 
8700 Würzburg 
Computer Martin 
(09 31) 16558 
Schöll Computercenter 
(0931) 504 88 
8750 Aschaffenburg 
IS + S Informationstechnik 
(060 27) 1285/86 
Viktor Willgerodt 
(060 21) 21375/79 
8860 Nördlingen 
Kutzschbach Elektronik 
(09081) 86022 
8880 Dillingen/Donau 
Reitzner Bürozentrum 
(090 71) 2060 
8898 Schrobenhausen 
EOP Computersysteme 
(08252) 7031 
8900 Augsburg 
Maurer & Partner 
(08 21) 519382 
8940 Memmingen 
Computerladen 
(08331) 5942 
8960 Kempten 
Staehlin (0831) 28001 
Weiss Büro + Datentechnik 
(08 31) 13017 
8974 Oberstaufen 
Büromarkt Mohr 
(08386) 7111 
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Bild 5: Diese Schaltung liefert 5 Volt (stabilisiert) für dii 
Elektronik 


Bild 6: Leistun ufen zur Ansteuerung der Motor. 


an den Userport gelegt wird. Springt der Multivibra- 
tor auf Null zurück, werden die Motoren wieder ab- 
geschaltet. Das Programm trägt nun die Daten in die 
Tabelle ein und springt zurück zur Joystickabfrage. 
Unterprogramm „Steuern und Speichern“ (Zeilen 
500 bis 730): Dieses Unterprogramm ermöglicht ein 
Abspeichern des Kurses während des Fahrens. Vom 
Aufbau her unterscheidet es sich nur wenig vom Un- 
terprogramm „Steuern“. Hier wird statt der Tabelle 
eine Speicheranzeige verwendet, die anzeigt, ob 
noch genügend Speicherplatz zur Verfügung steht. 
Die Motorsignale werden ab Adresse 49152 FF ge- 
speichert. 
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Unterprogramm „Tastatureingabe" (Zeilen 1000-: 
1080): Hier erfolgt die Kurseingabe per Tastatur, 
ohne daß die Motoren aktiviert werden. Das Pro- 
gramm wartet auf die Steuerbefehle: Links, rechts, 
vorwärts und Stop, setzt sie um und speichert sie ab 
Adresse 49152. Mit EXIT kehrt man ins Menü zurück. 
Unterprogramm „Daten speichern“ (Zeilen 1500 bis 
1555): Das Unterprogramm speichert die im RAM 
vorhandenen Daten auf Diskette ab. Es fragt nach 
dem Namen des Weges und speichert die Daten als 
sequentielle Datei. Anschließend wird der Fehlerka- 
nal gelesen (Zeilen 1700 bis 1715). Die Fehlerabfrage 
wird auch vom Unterprogramm „Daten laden“ be- 
nutzt. Liegt ein Fehler vor, erfolgt eine Meldung und 
Anzeige des Fehlerkanals. Liegt kein Fehler vor, 
springt das Programm zurück ins Menü. 
Unterprogramm „Daten laden" (Zeilen 2000 bis 2060): 
Diese Routine ermöglicht, einen auf Diskette abge- 
legten Kurs zu laden. Nach der Eingabe des Kursna- 
mens sucht das Programm die Datei mit dem ent- 
sprechenden Namen. Ist es vorhanden, werden die 
Daten in den Speicher geladen (ab Adresse 49152 ff). 
Liegt kein Fehler vor, erfolgt der Rücksprung zum 
Hauptmenü. 


Sensor an Computer: Hindernis 


voraus . 
RT BEN ET 
Unterprogramm „Bahnwiederholung“ (Zeilen 2500 
bis 2820): Nach diesem Programm fährt das Fahr- 
zeug den im Computer gespeicherten Kurs ab. Eine 
Tabelle zeigt die gefahrenen Schritte an. Die Daten 
werden aus dem Speicher ab Adresse 49152 ff gele- 
sen. Der Computer wartet auf den „l"-Impuls des 
Taktgenerators und gibt die Steuersignale über den 
Userport an die Motoren weiter, bis der Taktgenera- 
tor auf „O“ zurückspringt. Erfolgt keine Unterbre- 
chung durch Betätigung der Feuertaste vom Joy- 
stick, so wird die Adresse um 1 erhöht. Nach Abar- 
beitung des Unterprogramms Rückkehr zum Haupt- 
menü. 

Unterprogramm „Bahndarstellung“ (Zeilen 3000 bis 
3120): Dieses Unterprogramm zeigt den gespeicher- 
ten Weg auf dem Bildschirm an. Es entspricht dem 
Unterprogramm „Bahnwiederholung“, jedoch wur- 
de die Motorsteuerung weggelassen. Statt dessen 
sorgt eine Warteschleife für ein langsameres Lesen 
der Tabelle. 

Das computergesteuerte Fahrzeug eignet sich vor- 
züglich zu Lehrzwecken und kann noch weiter aus- 
gebaut werden. Durch die Verwendung eines Com- 
puters erhöhen sich die Möglichkeiten des program- 
mierbaren Gefährts, im Vergleich zu einem fernge- 
lenkten Fahrzeug. Mit dem beschriebenen Pro- 
gramm bieten sich folgende Kombinationen an: 

1.) Man fährt einen beliebigen Kurs, der gleichzeitig 
gespeichert wird. Dieser Kurs kann dann beliebig 
oft zu einem späteren Zeitpunkt abgefahren werden. 
Voraussetzung ist, daß der Kurs auf Diskette gespei- 
chert ist. 


ET ; A ; 
Bil ld 8: Bei der Bahnaufzeichnung entsteht dieses Puls- 
‚diagramm 


2.) Über die Tastatur gibt der Bastler einen Kurs ein, 
der durch einen Befehl im Menü aufgerufen und ge- 
fahren wird. Der zurückgelegte Weg läßt sich eben- 
falls auf Diskette speichern. 
3.) Ein gespeicherter Kurs kann nur auf dem Bild- 
schirm dargestellt werden. 


Ohne Software geht nichts 
BEREITET TR 


Wird das beschriebene Fahrzeug zu langweilig, 
kann es noch um einige Funktionen ergänzt werden. 
So kann eine Stoßstange mit Taster dem Computer 
ein Stopsignal mitteilen, wenn das Fahrzeug auf ein 
Hindernis stößt. Dann muß es allerdings zurückset- 
zen können, um das Hindernis in einem Bogen zu um- 
fahren. Die dafür nötige Drehrichtungsumkehr steu- 
ert man am einfachsten mit Hilfe eines Relaisum- 
schalters, der zwischen Leistungsstufe und Motor 
eingefügt wird. Die Ansteuerung des Relais erfolgt 
per Computer. Userport-Leitungen stehen genü- 
gend zur Verfügung. Zur Früherkennung von Hin- 
dernissen lassen sich ebenso Ultraschallsensoren 
einsetzen, wie sie in Autofocus-Kameras Einsatz fin- 
den. Ein Fotowiderstand kann dazu benutzt werden, 
das Fahrzeug zu einer Lichtquelle zu lenken und um 
ein Hindernisse zu erkennen. 
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"Bild 7: Mit einer Handvoll 
Bauteile läßt sich der be- 
nötigte Multivibrator auf- 
'en ist die 
bau altun 


Elektronii 
ertig a 
enthalten 


Besonders im Bereich der Sensoren liegen die inter- 
essantesten Möglichkeiten um einem computerge- 
steuertem Fahrzeugmodell einen realistischem 
Schliff zu verleihen. Dazu ist es erforderlich, das 
Fahrzeug mittels einer Fernsteuerung unabhängig 
vom Kabel zu machen. In diesem Fall wird der Takt- 
generator vom Fahrzeug gelöst und direkt an den 
Computer geschaltet. Der Sender gibt die Impulse 
an den Empfänger im Fahrzeug weiter, wo sie über 
Relais oder Transistoren an die Motoren weitergelei- 
tet werden. Die Stromversorgung des Taktgenera- 
tors erfolgt dann über den Computer, während die 
Motoren und die restliche Elektronik über einen ge- 
eigneten Akku versorgt werden. 

(Brian Schroeder) “TRETEN 


rem u mu, mm, m 
5 rem for cl-49152 to 53248 : poke cl,25 
b je S.% en 
18 poks 53280,8:poke 1436 
er 28 po Ku Seesen 56577, ® e251 
nes Beine "Celr,uht, 3spacssJ0L2ichn ulP" 6683 
86 print "C3spaces,cbm hlprogrammierbares 3914 
kettenf: ze ‚cbm n]" 
27 print "[3spaces)L[31chm BaBhaRt eı” 6683 
88 print "L ‚down,yel 3997 
ir RE Sa redet re RE RE ; 
29 print "[2spaces]****=** von brian 3914 
schroeder **=#=#“r 
30 print "[2spaces) 3828 
F ee nn ” 
je Lgrn]“ IR 
! 32 print "Cdown,wht,2spacesJfunktionen :” 1882 
33 print "[2spaces,i2chm t)” 2019 
48 print "[grn,2spaces]1) Fahren.” ı232 
41 print "Cdown,?spaces]2) fahren und weg 3516 
abspeichern.” : 
42 print "[doun, @spaces]3) weg ueber 3395 
tastatur eingeben.” 
43 print "[down, Espaces)“4) weg auf def 3064 
disk speichern.” 
44 print "[down,2spaces]5) weg von der 2730 
‚disk laden. » . 
35 print "Cdown,2spaces]6) gespeicherten 2938 
: weg Fahren, » : 
46 print "[down,2spaces]7) gespeicherten 365632 
weg zeigen.”:print 
50 input "[Lwht, 2spaceslwelche funktion "; 2342 
a:print 


“ 


Februar/87 Im 49 


» 


viGelchema 


on a gosub 190,500,1000,1500,2000, 
2508, 3880 


goto 18 

rem fahren 

rem .....——.... 

print :print :print "[clr,2spaces,yel] 


fire [3shift *J> zurueck zur 
Funktionswahl” 

print :print tab(2); "[Lwht]0L30chm yIP” 

print tab(2);"[Ccbm h,3spaces]gefahrene 
schritte :[7spaces,cbm n]" 

print tab(2);”"L[30cbm p,shift @)” 

print tab(2);"Cwht,cbm h,cyn] vor 
C3spaces)"”;tab(8); "Lwht,cbm h,red) 
links ";tab(14); "Cwht,cbm h,grn] 
rechts”; 

print tab(20);"Cwht,cbm h,yel] stop "; 
tab(33); "Cwht,cbm n]” 

print tab(2);"Cwht]0L7chbm yJOL7cbm yJO 
C7cbm yJOL6cbm yIP” 

print tab(2);"Cwht,cbm h,7spaces, 

cbm h,7spaces,cbm h, 7spaces,cbm h, 
6spaces,cbm n]" 

poke 56579, 251:v-5 

j"peek (56329) 

if J=-127 or j=125 then u=® 

if jJ=-126 then u=3 

if j=123 then u=2 

if j=119 then u=1 

if )J=111 then goto 400 

gosub 4890 

gosub 299 

goto 128 

rem -- daten in tabelle eintragen -- 
:if v<>u then print tab(2);"Luht, 

cbm h,7right,cbm h,7right,cbm h, 

7right,cbm h,6right,cbm n]" 

:if u=2 and v<>u then l=i1:print tabt 
11); "CredJ”;1; "Lwht,,2up)” 

:if u=2 and v=u then l=l+1:print tabt 
11); "Cred)”;1;"Cuwht,2up]” 

:if u=l1 and vou then r*-il:print tab( 
19); "Cgrn]";r;”Luht, Zup]” 

:ifF u=l and vu then r=r+l:print tabl 
19); "Cgrn]”;r; "Lwht, 2up)"” 

:if u=3 and v<>u then vo=l:print tabl 

3); "Ccyn)” ;vo; "Lwht, 2up]” 

:if u=3 and v=u then vo-vo+l:print 

tab(3); ”Ccyn]”;vo; "Cwht,Zup)” 

:if u=® and v<>u then s=l:print tab 

86); "[yel]”;s; "Luht, 2upl” 

:iF u=® and v=u then s=s+l:print tab(l 

86); "Cyel]”;s; "Luht,2up]” 

print tab(i2);"[Lwht,cbm h,7right,chbm h, 

7right,cbm h,7right,cbm h,6right, 

cbm n)"” 

v-u:return 

print tab(2);"[Cwht,cbm h,7right,cbm h, 

7right,cbm h,7right,cbm h,6right, 

cbm n)" 

For w=l to 3808:next :return 

rem fahren und weg abspeichern 

rem „=_z.uumnssnsceozzzzzu—m um u— m 

ad-49151:f-8 

print "C[Cclr,18Bdown]” 

print "[uht, 2spaces]fire [3shift *J> 
zurueck zur funktionswahl"” 

print "[Cdown, 2spaces,yellspeicher : 

[down]” 

poke 556579, 251 

ad*-ad+1:f=f+1 

J=-peek (56329) 

u=d 

if J=127 or 125 then u=® 

if j=126 then u=3 

if J-123 then u=2 

if j=119 then u=1 

if F>18B then print "*";:F=2 

if ad>519888 then print "Cred}”; 

if ad=->53247 then print :print " 

C2spaces,wht]speicher voll !!! ": 

return 

gosub 4900 

poke ad,u 

if j=-111 then poke ad,255S: return 
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WW MORE FTER WERE SEM 


2930 


730 
7498 
741 
1000 


1091 
1002 
1003 


1010 
1011 


1012 


1013 
1015 
1016 
1017 
1018 
190208 


1021 


1022 
1035 
1036 
1038 


1033 


1049 


1042 


1043 
1058 
1051 
1052 
1053 
10608 
1061 


1065 


1066 
1067 
1078 
1080 
1188 
1101 
1508 
1505 
1518 
1515 
1520 


1525 
1530 
1531 
1532 
1533 
1534 
1540 
1545 
1558 
1555 
1633 
1708 
1705 
1718 


1711 


1715 
17208 
1998 
1999 
[1.114] 


goto 518 

rem weg ueber tastatur eingeben 
ER EEE EEE ARE ER ER SEE SR ERER ER HE ae an 5 vn 
print "Cclr,yell":print :input " 
[2spaces]kurs [rvsleloffJingeben oder 
[rvs]vl[lofflerbessern ";ev$:print 

if ev$S=-"v”" then 1038 

ad-49152:u-0:s=8 

print "[clr,wht ‚Sdown ,‚4spaces,rvs]e 
Loff] C3shift *J> zurueck zur 
funktionswahl..” 

print "[grn,2down, 2spaces]schritt :"”; 

Ss; :input "[2spaces)richtung ”;r$ 

if left$ (r$,1)=-"e” then poke ad,25S: 

return 

print "[grn,down,2spaces]Jwie viele 
schritte in diese ” 

input "[grn,2spacesJrichtung ”;as 

if left$ (r$,1)="v” then u=3 

if left$ (r$,1)="s” then u=® 

if left$ (r$,1)="l"” then u=2 

if left$ (r$,1)="r"” then u=1 

ad-ad-1:s=*s-1:if as-1<8 then poke ad, 

255:return 

For wr=® to as-l:ad=-ad+1:5=s+1:poke 

ad,u:next 

ad-ad+1:s=s+1 

print "”[7up]” 

goto 190083 

input ”"[clr,4down, red, 2spaces)schritt 
[C2spaces]";s 

print ”"[wht ‚2down, 4spaces,rvsleloff] 
[3shift *J> zurueck zur 
Funktionswahl..” 

input "[red, 2down, 2spaces]Jrichtung ”; 

rs 

if left$ (r$,1)=-"e” then poke ad,255: 

return 

print ”"[down,2spaces]wie viele 
schritte in "” 

input "[2spaces]ldiese richtung” ;as 
if left$ (r$,1)="v” then u=3 

if left$ (r$,1)="s” then u=8 

if left$ (r$,1)="1” then u=2 

if left$ (r$,1)=-"r" then u=1 

if as-1<8 then return 

for wr=® to as-1:poke 43152+s ,u:s=s+1: 

next x 

print "[grn,down,2spaces]noch einen 
schritt verbessern [3j/n] ?” 

get a$:if a$-=""” then 1066 

print "[Bup)” 

if a$=-"j"” then 1038 

return 

rem weg auf der disk speichern 
ad-49152 

u=peek (ad):if u>3 then 1522 

ad-ad+1 

goto 1505 

print :input "[wht, 2spacesJweg-name ”; 
as 

open 8,8,B,3$+".b,w" 

for z=-43152 to ad 

if peek (z)=3 then print#8,chr$ (B6); 
if peek (z)=2 then print#8,chr$ (76); 
if peek (z)=1 then print#8,chr$ (B2); 
if peek (z)=B then print#8,chr$ (83); 
next z 

print#8:close 8 

gosub 1798 

return 

tan en fFehlerkanal lesen ----- 
open 15,8,15 

input#15,Ff,Ffb$,sp,se 

if Ff<>® then print "[2spaces,red,rvs] 
fehler !!![Loff]":print 

if FF<>d then print "”[2spaces,red)> 
[wht]”;ff;fb$;sp;se:for wi to 5008: 
next 

close 15:return 


vum ee 
rem weg von der disk laden 

rem -ııninnunnununmennununnn 

print :input "[2spaces, wht]Jweg-name"; 
as 


568 


5954 


1417 
1875 
4ol2 


3524 
28672 
3203 
1724 
1982 
1841 
1814 
1965 
3534 
3544 
1036 
1919 

697 
1655 


4065 


1658 
2672 
2638 
1928 
1982 
1841 
1814 
1965 

341 
3329 
4234 
1785 
1122 


1558 
142 


2478 


4233 


sıl 


1675 


20085 ad-4S152 851 3003 print tab(2);”L[C30cbm p,shift @)” 6658 
2018 open 8,8,8,a$+”.b,r” 1716 3004 print tab(l2);”"Cuht,cbm h,cyn] vor 5664 
2015 get #8,u$ 769 [3spaces]”;tab(8);"Lwht,cbm h,red] 
e0156 if uS=-"v” then u=3 1575 links ”;tab(14); "Cuht,cbm h,grn]) 
2017 if uS="1" then u=2 1506 rechts”; 
2018 if u$="r” then u=1 1439 3905 print tab(20);"Cwht,cbm h,yel] stop "; 2913 
2013 if uS="s” then u=® 1467 tab(33); "Lwht,cbm n]" 
2020 if st>63 then 2050 1332 3006 print tab(2);"Cwhtl0L7chm y10L7cbm yJ0 568089 
2025 poke ad,u 480 C7cbm yJ0C6cbm yIP” 
2038 ad-ad+l:goto 2015 1320 30927 print tab(2);"Cuht,cbm h,7spaces, 2304 
2059 close B 272 cbm h,7spaces,cbm h,7spaces,cbm h, 
2055 gosub 1700 ss Sspaces,cbm n]” 
2068 return 142 3010 ad=-49152:v-5 ı452 
E498 rem gespeicherten weg Fahren 3020 u=peek (ad):if uW>3 then 3198 1553 
Bras Kam. ee en 3025 :if v<>u then print tab(2);"Luwht, 5833 
2502 print "[clr,2spaces,yellfire 4156 cbm h,7right,cbm h,7right,cbm h, 
[3shift *)> zurueck zur 7right,cbm h,6right,cbm n]" 
funktionswahl” 3026 :if v<>u then For wi to 2088:next 1518 
2501 print :print tab(2);"CwhtI0C30chm yIJP" 69561 3030 :if u=2 and v<>u then l=1:print tabt 3503 
2502 print tab(2);”Ccbm h,3spaces)gefahrene 2543 11);"Cred]”;1;"Cwht, 2upI” 
schritte :[7spaces,chm n]" 3031 :if u=2 and v=u then I=l+1:print tab( 3483 
2503 print tab(2);”"LL30cbm p,shift @)” 6658 11); "Cred)”;1;"Lwht,,2up)” 
2504 print tab(2);"[Lwht,cbm h,cyn) vor S6E4 3032 :if u=1 and v<>u then r=1:print tabl 3707 
[3spaces]”;tab(8); "[wht,chm h,red] 19); "Cgrn]”;r;"Cuht, 2up]” 
links ”;tab(14); "Lwht,cbm h,grn] 3033 :iF u=1 and v=u then rer+1:print tabt 3421 
rechts”; 19); "Cgrn]";r; "Luht, 2upJ” 
2505 print tab(28);"Lwht,cbm h,yel] stop "; 2913 3034 :iF u=3 and v<>u then vo=l:print tab 128 
tab(33); "Cwht,cbm n)" 33; "Leyn]";vo; "Lwht, Zup]” 
2506 print tab(2);"CwhtJOL7chbm yJOL7cbm yJ0 65889 3035 :iF u=3 and v=u then vo=vorl:print 3342 
C7cbm yJOL&chm yIP” tab(3); ”[eyn]"”;vo; "Lwht, 2Zup]” 
2507 print tab(2);"[wht,cbm h, 7spaces, 2304 3036 :if u=® and v<>u then s=1:print tabt 3723 
cbm h,7spaces,chbm h,7spaces,cbm h, 26); "Cyel]”;s; "Lwht, 2up]” 
Espaces,chbm n]" 3037 :if u=® and v=u then s=s+1:print tabt 3473 
2512 poke 56579,251 383 26); "Cyell”;s; "Luht,2ZupI” 
2528 ad-43152:v=5 1452 3048 print tab(2);"Cwht,cbm h,7right,cbm h, 4797 
2530 u=peek (ad) 432 7right,cbm h,7right,cbm h,6right, 
2540 if u=255 or u>3 then return 1672 cbm n]" 
8555 gosub 2700:gosub 4000 1125 3045 if peek (56320)=111 then return 1867 
2560 if ad=->53247 then return 1293 3050 v-u:ad-ad+l:goto 3029 1866 
2570 ad-ad+1 S42 3100 print tab(2);"Cwht,cbm h,7right,cbm h, 4797 
2580 if peek (56320)-111 then goto 18 2902 7right,cbm h,7right,cbm h,6right, 
2598 goto 2538 605 ebm n)” 
2700 u-peek Cad):if u>3 then 2800 1459 3101 print tab(2);"Lwht,cbm h,7right,cbm h, 4797 
2705 :ifF v<>u then print tab(2);"Luwht, 5833 7right,cbm h,7right,cbm h,6right, 
cbm h,7right,cbm h,7right,cbm h, cbm n]" 
7right,cbm h,6right,cbm n]"” 3118 For w*1 to 4088:next 1068 
2706 :if v<>u then for w=1 to 2088:next 1518 3128 return 142 
2718 :if u=2 and v<>u then 1=1:print tab 3503 4200 rem motoransteuerung 
11); ”Cred)”;1;"Luht, 2up)” RR N een arg 
2711 :if u=2 and v=u then 1=1+1:print tabt 3483 4210 iF peek (56577)-3 then 4920 1870 
11); ”Cred]”;1;"Cuht,2up)” 4811 if peek (56577)-2 then 4020 1866 
e712 :iF u=r1 and v<>u then r=1:print tab( 3707 t012 if peek (56577)=-1 then 4920 1862 
19); "Cgrn)”;r;"Cwht,2up)” 4013 if peek (56577)-=® then 4920 1858 
2713 :if u=1 and v=u then r*r+1:print tabtl 3421 4015 goto 4010 573 
18); "Cgen)” ;r; "Cwht,2up)" 1020 if peek (56577)=7 then 4030 1959 
2714 :iF u=3 and v<>u then vo=i:print tabt 4128 4021 if peek (56577)-6 then 4930 1946 
3), "LCeyn)” ;vo; "Cwht ,2up)” i022 if peek (56577)=-5 then 4030 ı342 
P715 :if u=3 and v=u then vo=vo+tl:print 3342 1023 if peek (56577)=4 then 4038 1338 
tab(3); "Teyn]”;vo; "Cwht, Zup)” +925 goto 4020 581 
2716 :if u=®d and v<>u then s=1:print tabtl 3723 4030 poke 556577,u 1168 
26); "Lyell";s; "Lwht, Zupl” 1031 if peek (56577)=2 then poke 56577,0: 3053 
2717 :if u=® and v=u then s=s+ti:print tabl 3473 return 
86); "Lyel]";s; "Lwht,,2up)” 1032 if peek (56577)=1 then poke 56577,0: 3049 
2728 print tab(2); "[Lwht,cbm h,7right,cbm h, 4797 return 
7right,cbm h,7right,cbm h,6right, 1033 if peek (56577)=® then poke 56577,®: 3045 
ebm n]" return 
2730 v-u:return 713 1034 if peek (56577)=3 then poke 56577,0: 3057 
2800 print tab(2);”"Cwht,cbm h,7right,cbm h, 4797 return 
7right,cbm h,7right,cbm h,6right, 1035 goto 4930 583 
cbm n]"” {040 rem -m——muunnnnununnnnnnnnnnnnnnnnnn 
2801 print tab(2); "Lwht,cbm h,7right,cbm h, 4797 
7right,cbm h,7right,cbm h,6right, 
chm n]J" 2 
28108 For wei to 4808:next en 
2828 return 4 re, y RR ® u 
Bas Ten  oulslHherken uag -Zaihen Listing 1: Software für die Steuerung des Fischer: 
2999 rem -=uunmmnnunnnnnnnnnnnnnnnn technik-Kettenfahrzeugs 
3008 print "[clr,2spaces,yellfire 4156 
[3shift *J> zurueck zur 
Funktionswahl” 
3001 print :print tab(2);"CwhtJ0C30chm yJP” 6961 Das Programm C64 Panzerfahrer“ 
3002 print tab(2);"Lcbm h,3spaces] 3208 ul als befindet 


sich auf der RUN-o-thek-Diskette zu dieser Ausgabe. 


gespeicherte schritte :[4spaces,cbm n] 


” 
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igeltihemma mm em PIE EI NEE SHEHRTETEREIRENSSEREEREEEER 


Jetzt hat der Computer im Sport Ein- 
zug gehalten: Sportfunktionäre ratio- 
nalisieren Papierkram, Trainer be- 
rechnen Trainingspläne, Turnlehrer 
analysieren Unterricht — und Sport- 
vereine optimieren Wettkämpfe. Va- 
lerie Kistler berichtet über ein sinn- 
volles Symposium der Eidgenössi- 
schen Turn- und Sportschule über 
das Thema „EDV in Sportunterricht 
und Training". 


Markt offenbar noch als zuwenig ergiebig ein, um 
mit einsatzfähigen und günstigen Produkten aufzu- 
warten. 

Wo Lösungsansätze existieren, stammen sie oft aus 
der Küche findiger Trainer und Ausbilder. Die dazu 
nötigen Kenntnisse haben sich die Entdecker meist 
im Selbststudium angeeignet. 

Klein scheint die Zahl brauchbarer Software-Pro- 
gramme. Wie die Verbände erledigen die Ausbil- 
der mit dem Computer zuerst einmal ihren Papier- 
kram. Erst einzelne nutzen die Segnungen der Infor- 
matik für den Sport selbst, erfassen Trainings- und 
Wettkampfdaten und werten sie zur Spiel- und Un- 
terrichtsbeobachtung oder für individuelle Trai- 
ningspläne aus. 

Solche Programme der Marke Eigenbau, das wurde 


Eine Umfrage des „Schweizerischen Landesverban- 
des für Sport" bei rund 70 Sportverbänden (SLS) 
brachte es Ende letzten Jahres ans Licht: Auch für 
Sportler ist EDV kein weißer Fleck auf der Landkar- 
te mehr. Viele Verbände und Vereine setzen für ihre 
Administration eine Vielfalt von Programmen ein, am 
liebsten auf Personalcomputern und Kleinsystemen. 
Das EDV-Wissen in den Verbänden ist allerdings 
kaum auf einen Standard zu bringen: „Die heutigen 
Lösungen wurden durch Dritte entwickelt, einge- 
kauft oder durch zufällig vorhandene EDV-Profis 
zum Laufen gebracht“, sagt der SLS im Begleittext 
zur Umfrage. 


Trainern fehlt Know-how 


er 


Der een? 


In Training, Unterricht und für Wettkämpfe dagegen 
beginnt für die Sportler das Informatik-Neuland. Von 
den rund 130 Trainern, Turnlehrern und Sportleh- 
rern, die am Magglinger Symposium „EDV in Sport- 
unterricht und Training" teilnahmen, verfügte knapp 
die Hälfte über berufsspezifische Erfahrungen mit 
dem Computer. Mit dem Symposium sollte den Inter- 
essierten der Zugang zur Informatik erleichtert und 
der Erfahrungsaustausch unter den Entdeckern ge- 
fördert werden. 

Denn wo die Verbandsadministrationen auf gesi- 
cherte Verfahren zurückgreifen können, fehlt es den 
Trainern und Lehrern weitgehend am Angebot. Un- 
ter allen Beteiligten bis hin zu den Sportlern selbst 
tauchen die unterschiedlichsten Bedürfnisse auf, 
aber die großen Herstellerfirmen stufen diesen 
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am Symposium deutlich, haben dann auch ihre Muk- 
ken und Macken, sind mit Fehlern behaftet und der 
Aufwand steht noch in keinem Verhältnis zu den Re- 
sultaten. Die Programm-AÄutoren geben das auch un- 
umwunden zu. „Die gezeigten Programme sind je- 
doch durchaus einsatzfähig und vermögen ihren 
Zweck zu erfüllen — auch wenn die Puristen unter 
den Informatikern angesichts solch selbstgestrickter 
Lösungen die Nase rümpfen mögen", ermunterte Pe- 
ter Wegmann, Mitarbeiter am Institut für Automatik 
der ETH Zürich, die Pioniere mit seinem Referat. 
Seit zehn Jahren ist für Paul Köchli, Trainer der zur 
Zeit erfolgreichsten Profi-Radequipe „La vie claire", 
der Computer zu einem Hilfsmittel für seine Arbeit 
geworden. Am Anfang speicherte er die Trainings- 
daten seiner Fahrer auf einen Computer des ameri- 
kanischen Herstellers South West Technical Pro- 
ducts und wertete sie mit Hilfe einer Reihe von 
selbstgeschriebenen Basic-Programmen statistisch 
aus. : 

Später entwickelte er Programme zur Simulation der 
radsportlichen Leistung. Er veränderte unterschied- 
liche Faktoren wie Gewicht des Fahrers, Reifen- 
druck, Luftwiderstand oder Temperatur und konnte 
dadurch ihren Einfluß auf die Gesamtleistung be- 
werten. „Aus diesen Erkenntnissen heraus lassen 
sich für jeden Fahrer die gewinnbringendsten Fakto- 
ren ermitteln", will der findige Trainer dabei in Er- 
fahrung gebracht haben. 

Unter Köchlis Fittichen trainieren gegenwärtig 21 
Rad-Profis, darunter der diesjährige Tour-de-Fran- 
ce-Sieger Greg Lemond oder die beiden Schweizer 
Guido Winterberg und Nicki Rüttimann. Die meisten 
geben ihrem Trainer täglich ein Trainingsprotokoll 


ab, und melden neben dem absolvierten Trainings- 
umfang auch Körpergewicht, Ruhepuls oder Anzahl 
Schlafstunden. Köchli erfaßt die Daten, wertet sie 
mittels Grafiken aus und bespricht sie mit den einzel- 
nen Athleten. „Mittlerweile können aber viele Fah- 
rer ihre Daten selber interpretieren und daraus 
Schlußfolgerungen für den Trainingsaufbau ziehen“, 
ergänzt er dazu. 

Vor zwei Jahren schaffte er sich zusätzlich einen Mac- 
intosh mit 128 KByte Hauptspeicher an, den er seither 
ständig aufrüstet. In erster Linie verwendet der Rad- 
renntrainer Standardsoftware, so die Excel Tabel- 
lenkalkulation oder das neue Datenbankprogramm 
Quatrieme Dimension aus Frankreich. Häufig mit 
den Rennfahrern auf Reise, möchte er zur Zeit einen 
tragbaren Personalcomputer mit seiner Datenbank 
zu Hause verbinden. Zudem plant er den Aufbau ei- 
nes Expertensystems, das Bild, Sprache und andere 
Informationen interaktiv verknüpfen soll. 

Trainer, die wie Paul Köchli über ein langjährig auf- 
gebautes, umfassendes EDV-Wissen verfügen, ha- 
ben in der Schweizer Sportszene vorläufig noch Sel- 
tenheitswert. Es ist deshalb kein Wunder, daß ande- 
re Trainer den Erfahrungsaustausch mit dem Pionier 
suchen. So weilte letzten Winter auch Fußball-Na- 
tionaltrainer Daniel Jeandupeux auf Besuch im Jura, 
wo Köchli wohnt. „Jeandupeux besitzt ebenfalls ei- 
nen Macintosh. Er setzt für seine Arbeit vor allem 
Zeichnungsprogramme ein, um damit verschiedene 
Spieltaktiken auszuprobieren“, weiß Köchli über das 
Treffen zu berichten. 


Schwimmen mit Atari 
NN RER EREFE 


Erst seit knapp vier Jahren, dafür um so begeisterter, 
beschäftigt sich der Westschweizer Schwimmtrainer 
Laurent Ballif mit dem Computer. Zusammen mit ei- 
nem Freund kaufte er zuerst einen Osborne 0l-, spä- 
ter kam ein Atari 1040 dazu. Am Anfang sollte ledig- 
lich die Administration des Schwimmclubs Vevey- 
Natation, dem Ballif vorsteht, rationalisiert werden. 
Bald aber begann er, Trainings- und Wettkampf- 
resultate seiner 25 Athleten, darunter Mitglieder der 
Nachwuchs-Nationalmannschaft, zu speichern, er- 
stellte Formkurven und entwickelte daraus individu- 
elle Trainingspläne. 

„Bis dahin war die Arbeit eines Trainers eine subjek- 
tive Größe. Mit Hilfe der EDV kann diese Arbeit ob- 
jektiver werden", erklärt Ballif. „Einerseits kann man 
dem Athleten mit Zahlen und Kurven seine sport- 
technischen Schwächen belegen. Andererseits kann 
man ihm auch zeigen, welche Ziele er erreichen 
könnte, wenn er optimal trainiert. Das kann enorm 
motivierend wirken." Seine Schützlinge würden in 
der Tat Kritik besser akzeptieren, wenn sie von den 
Berechnungen des Computers untermauert sei. 

Das Institut für Sportwissenschaften an der Universi- 
tät Frankfurt gehört zur europäischen Spitze. Unter 
anderem führt es im Rahmen der Leistungsbiome- 
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chanik angewandte Untersuchungen zur Analyse 
und Optimierung der Technik in den verschieden- 
sten Sportarten durch. 

Ein Beispiel einer solchen Untersuchung ist das 
Reck-Kürprogramm des zur Zeit besten deutschen 
Kunstturners Jürgen Geiger. Dieses enthielt früher 
unter anderem einen gestreckten Doppelsalto. Nun 
war das Problem, daß Geiger seine: Kür mit einem 
dreifachen gestreckten Salto um einige Punkte hätte 
aufwerten können, und man erbat sich den Rat des 
Instituts für Sportwissenschaften. 

Dieses ließ die Flugphase und die Arm- und Beinbe- 
wegungen des Turners auf dem Computer simulie- 
ren. Ausgehend vom Schwerpunkt des Turnerkör- 
pers wurden zum Zeitpunkt des Loslassens der 
Reckstange Daten wie Höhe, Weite, horizontale und 
vertikale Geschwindigkeit, Drehimpuls gemessen 
und verarbeitet, und der simulierte Jürgen Geiger 
drehte den Dreifachen gestreckt. 

Darauf nahm der wirkliche Jürgen Geiger das Trai- 
ning auf und schaffte das schwierige Element in zwei 
Wochen. „Dank Computersimulationen können be- 
stimmte Bewegungsabläufe schneller, erfolgreicher 
und vor allem ohne Verletzungsgefahr verbessert 
werden", sagt Mauno Nissinen, ehemaliger Kunsttur- 
ner, heute Mitarbeiter am Frankfurter Institut. Aller- 
dings seien solche Untersuchungen und Analysen 
mit einem hohen finanziellen, personellen und tech- 
nischen Aufwand verbunden. 

In der Sportdidaktik finden seit kurzem systemati- 
sche Beobachtungen des schulsportlichen Unter- 
richts statt. Kurt Eger, Professor am Institut für Sport 
und Sportwissenschaften der Universität Bern, stellte 
dazu das „Universelle Video-Beobachtungs-System" 
(UVBS) vor. 

Dieses vom Heidelberger Sportforscher Dr. Hans 
Freibichler entwickelte System ist aus fünf Kompo- 
nenten zusammengesetzt: Mikrocomputer mit Dis- 
kettenlaufwerk und Bildschirm, Videorecorder mit 
Monitor, FTS-Videorecorder-Controller zur Steue- 
rung des Videorecorders durch den Monitor, FTS- 
Tastatur mit 32 Tasten und Programmsystem für die 
Dateneingabe und ihre numerische und grafische 
Auswertung. 

In einem ersten Arbeitsschritt lassen sich über die 
FTS-Tastatur Beobachtungsbereich und Beobach- 
tungszeitraum definieren, also beispielsweise das 
Anweisungs- und Feedbackverhalten eines Turnleh- 
rers während einer Sportlektion. Dazu stehen maxi- 
mal zehn Beobachtungskategorien mit maximal 20 
Unterkategorien bereit. Anschließend kann die 
Turnstunde optisch und akustisch auf Video festge- 
halten werden. In der nachfolgenden Betrachtung 
können die entsprechenden Daten den definierten 
Haupt- und Unterkategorien einzelbildweise zuge- 
ordnet werden. 

Die Auswertung gibt nun Aufschluß darüber, auf 
welche Art der Lehrer seine Anweisungen erteilt 
hat. EDV wird aber auch für die Spielanalyse einge- 
setzt. Über die Erfassung von Spielaktionen sollen 


Fortsetzung auf Seite 134 P> 
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Der C64 und der C128 verfügen bei- 
de über enorme Grafikfähigkeiten. 
Das eigentliche Problem dabei ist, 
wie man an diese Fähigkeiten heran- 
kommt. Dieser Artikel zeigt mit kur- 
zen Beispielen wie, und hilft, die Gra- 
fikprogrammierung der Commodore- 
Rechner besser zu verstehen. 


Sowohl der C64 als auch der C128 bieten außerge- 
wöhnliche Grafikmöglichkeiten für einen vernünfti- 
gen Preis. Beide Geräte haben viele Gemeinsamkei- 
ten: verschiedene Modi, Auflösung, Farbe und Ani- 
mation. Der Zugriff auf die Grafik von Basic aus, ist 
allerdings völlig unterschiedlich. Basic 7.0 des C128 
unterstützt fast alle Möglichkeiten, während man auf 
dem C64 mit PEEK, POKE und Maschinenprogram- 
men zurecht kommen muß. 


Text-HiRes-Sprites 
EHE 


In diesem Artikel werden wir die verschiedenen 
Grafikmodi erforschen und die notwendigen Pro- 
grammschritte für beide Rechner vergleichen. Der 
C64 und der C128 haben drei grundsätzlich ver- 
schiedene Grafikmodi: Text, hochauflösende Grafik 
und Sprites. Alle C64-Fähigkeiten werden vom VIC- 
Chip ermöglicht. Der C128 verfügt zusätzlich über ei- 
nen 8563-Chip, der eine höhere Auflösung erlaubt. 
Um dies auch voll ausnutzen zu können, sollte man 
einen RGB-Monitor anschließen, während die VIC- 
Grafik auch von einem Composite-Monitor oder ei- 
nem Fernseher zufriedenstellend wiedergegeben 
wird. Zwar kann man auch den 8563 an einem Com- 
posite-Monitor betreiben, aber das Bild ist nicht an- 
nähernd so klar und bleibt außerdem monochrom. 


Text-Modus 
EEERETTTE 


Der Textmodus der beiden Computer bietet 40 
Zeichen in 25 Zeilen, 256 verschiedene Zeichen und 
16 Farben. Hintergrund und Rahmenfarbe können 
ebenfalls aus den 16 vorhandenen Farben frei ge- 
wählt werden. Es existieren zwei Standardzeichen- 
sätze. Einer beinhaltet Groß- und Kleinbuchstaben, 
der andere Großbuchstaben und Grafikzeichen. Die 
Umschaltung zwischen beiden erfolgt, wenn die 
Shift- und die Commodoretaste gleichzeitig gedrückt 
werden. Der Effekt ist auf dem Bildschirm sichtbar; 
jedes Zeichen verwandelt sich in das jeweilige 
Zeichen des anderen Zeichensatzes. In einem Pro- 
gramm kann man mit PRINT CHR$(14) auf Groß-, 
Kleinschreibung umschalten und mit PRINT CHR$ 
(142) wieder zurück zum Groß-/Grafik-Modus. Viele 
Eigenschaften des Textmodus können mit dem 
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PRINT-Befehl kontrolliert werden. Hier einige Bei- 
spiele: 

PRINT CHR$(147) Bildschirm löschen 

PRINT CHR$(19) Cursor home 

PRINT CHR$(28) ändern Zeichenfarbe in Rot. 
Diese Art von Kommandos darf in jeder Zeichenket- 
te vorkommen, die mit PRINT ausgegeben wird. 
Auch die Cursortastenbefehle, RVS ON/OFF und 
INST/DEL können verwendet werden. Das ist sehr 
wichtig, wenn man Text an einer ganz bestimmten 
Stelle ausgeben will, da dem C64 ein PRINT AT Kom- 
mando fehlt. Basic 7.0 bietet für diesen Zweck den 


CHAR-Befehl. Normalerweise dient er zur Ausgabe 
von Text auf einem HIRES-Bildschirm, aber er funk- 
tioniert auch im Textmodus. 

CHAR farbauelle,x,y,string,revers-flag 

Die Farbquelle kann 0 (Hintergrund) oder | (Vorder- 
grund) sein. Die gewünschten Koordinaten werden 
in x und y angegeben (Spalte 0 bis 79 und Zeile 0 bis 
25). Der String darf im Textmodus natürlich sämtliche 
Steuerzeichen enthalten. Das Revers-Flag ist optio- 
nal. 0 steht für RVS OFF und 1 für RVSON. 

Der C128 hat außerdem eine Sonderform des PRINT- 
Befehls, nämlich PRINT USING. Damit lassen sich 
Zahlen und Zeichenketten in einer genau definierten 
Form und Länge ausgeben. Um eine Zahl auf zwei 
Nachkommastellen zu formatieren, müßte man beim 
C64 so vorgehen: 

10 A= 123.45678 

20 A=INT (A*100)/100 

30 PRINT"A=";A 

Dabei besteht jedoch immer die Gefahr, daß Run- 
dungsfehler auftreten. Beim C128 ist es einfacher: 

10 A= 123.45678 

20 PRINT USING "####.##"; A 

Beide Programme drucken 123.45 aus. Der PRINT 
USING-Befehl ist jedoch handlicher und vielseitiger. 
Doch der Textmodus hat noch mehr zu bieten: den 
Multicolormodus und den EHM (erweiterter Hinter- 
grundfarbenmodus). Bevor wir uns diesen speziellen 
Eigenheiten des Textmodus zuwenden, sehen wir 
uns erst einmal an, wie der Computer mit Text- 
zeichen umgeht. 

Jedes Zeichen des C64/C128 besteht aus einer 8x8- 
Punkte-Matrix. Jeder Punkt wird dabei durch ein Bit 


repräsentiert. Sind diese Bits gesetzt, erscheinen die 
Punkte in der Vordergrundfarbe. Sind sie gelöscht, 
scheint die Hintergrundfarbe durch. Somit benötigt 
ein Zeichen acht Bytes für die Matrix. Bei 256 
Zeichen ergibt das insgesamt 2048 Bytes (entspricht 
2 KBytes), die ein kompletter Zeichensatz benötigt. 
Der Computer holt sich die Zeichencodes aus dem 
Bildschirmspeicher, sucht die Matrix im Zeichensatz 
und bringt das Punktmuster schließlich auf den Mo- 
nitor. 

Der Multicolor Textmodus (MC) wird auch vom Basic 
7.0 des C128 nicht unterstützt. Man kann sich bei bei- 


POKE 216,255 

Ab jetzt kann man auf die VIC-Register wie oben be- 
schrieben zugreifen. Das kleine Beispielprogramm 
in Listing 1 demonstriert, wie man auf dem C128 den 
Standardzeichensatz in Multicolor aktiviert. Da diese 
Zeichen nicht für Multicolor entworfen wurden, se- 
hen sie etwas seltsam aus; dafür aber recht bunt. Al- 
les, was eingetippt wird, erscheint in Multicolor, bis 
man „+“ drückt. 

Das nächste Programm in Listing 2 ist für den C64 ge- 
dacht. Es erlaubt eine Farbänderung mit den Funk- 
tionstasten: Fl ändert MC1, F7 ändert MC2 und Fl 


den Rechnern auf zahlreiche PEEKs und POKEs 
freuen. Multicolor erlaubt pro Zeichen bis zu drei 
Farben plus Hintergrundfarbe. Das ermöglicht eine 
lebendige Bildschirmgestaltung, egal, ob mit Text 
oder Grafikzeichen. Allerdings ist die Auflösung auf 
die Hälfte reduziert. Die Zeichen sind nur noch vier 
Punkte breit, allerdings sind die Punkte selbst dop- 
pelt so breit. Der größte Nutzen dieses Modus liegt 
im Einsatz selbstdefinierter Zeichen. Viele Objekte 
in professionellen Spielen sind nämlich gar keine 
Sprites, sondern selbstdefinierte Multicolorzeichen. 


Multicolorzeichen statt Sprites 
BEN‘ re a DLUmERZE 

Um den Multicolormodus auf dem C64 einzuschal- 
ten, muß Bit 4 in Adresse 53270 (Hex D016) gesetzt 
werden: 

POKE 53270, PEEK(53270)OR 16 

dann werden die gewünschten Farben 1 bis 3 in die 
entsprechenden Register geladen: 

POKE 53282, farbel 

POKE 53283, farbe2 

POKE farbram,farbe3 

Wie man sieht, haben alle Zeichen Farbe 1 und 2 ge- 
meinsam, Farbe 3 kann für jedes Zeichen individuell 
gesetzt werden. Abgeschaltet wird Multicolor mit 
POKE 53270,PEEK(53270) AND 239 

Auf dem C128 ist das Ganze etwas schwieriger, da 
hier das Betriebssystem einige VIC-Register mehr- 
mals pro Sekunde beschreibt. Um diesen Vorgang 
zu unterbrechen, muß man in Speicherstelle 216 den 
Wert 255 schreiben: 
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18 rem c128 multicolor character demo 


20 scnclr ® 328 
30 c$- 4461 
es "abcdefghi jklmnopqrstuvwxyz0123456789+ 

-£” 

48 poke 53280,8:poke 53281,8 1436 

S® rem c128 shadow register 

68 a-peek (216):b=-peek (217) 1490 

78 c-peek (2604):d=-peek (2685) 1372 

80 e=peek (2606) 5593 

90 al-53279 884 

100 bi-216 728 
118 poke 53282,2:rem mcl 991 
129 poke 53283,7:rem mc2 1963 
138 for i-55296 to 56295:poke i,5:next 2815 
148 For i=-® to 23:print c$:next 1663 
150 poke b1,255:rem shadowregister abschal 883 
ten 
160 poke al,peek (al) or 16:rem mcl 1529 
178 poke 2684,c:poke 26085,d:poke 2606,e: 3869 


poke 217,b:rem werte wiederherstellen 
180 get key a8 442 


198 if a$="«" then 210 1518 

200 print a$;:goto 180 1088 

210 poke al,peek (al) and 239:poke 216,a: 2322 
. rem mc off, vic neu initialisiert 

220 end 128 


Listing 1: Standardzeichensatz in Multicolor auf dem C128 


ändert die Farbe unter dem Cursor. Zum Programm- 
ende drückt man wieder „". 

Dieser Modus mit 80 Zeichen pro Zeile bleibt dem 
C128 vorbehalten. Für die Darstellung braucht man 
außerdem einen RGB- oder Compositemonitor. In 
diesem Mpdus können alle 256 Zeichen in den 16 zur 
Verfügung stehenden Farben verwendet werden, 
nicht jedoch Sprites, Multicolor oder erweiterte Hin- 
tergrundfarben. Die Befehle PRINT USING und 


CHAR arbeiten wie gewohnt. Auch im 80-Zeichen- ® 
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WISSEN m nn a EEE TEUER SEEE TORTEN 


modus kann man wie beim normalen 40-Zeichenmo- 
dus selbstdefinierte Zeichen einsetzen. Am einfach- 
sten kann man diese Zeichen mit entsprechenden 
Zeichensatzeditoren erstellen, von denen es eine 
Vielzahl gibt. 


Hochauflösende Grafik 
ASTERTETEIBEFTNE TEE 


Für viele ist die hochauflösende Grafik, kurz HiRes, 
interessanter als die diversen Textmodi. Hier hat der 
C128 wieder die Nase vorn, weil sein Basic 7.0 die 
Programmierung der 320x200 und 160x200 Punkte- 
grafik sehr angenehm gestaltet. 

Der eigentliche HiRes-Modus hat 320x200 Punkte, 
der Multicolormodus nur die Hälfte, also 160x200. 
Dabei erlaubt HiRes nur zwei Farben, je eine für Vor- 
der- und Hintergrund. Die Farbinformation wird dort 
abgelegt, wo sich im normalen Textmodus der Bild- 
schirmspeicher befindet. Je ein Byte aus dem Bild- 
schirmspeicher bestimmt die Farben von 8x 8-HiRes- 
Punkten. Die Werte erhält man nach der Formel 
Vordergrundfarbe + 16 x Hintergrundfarbe. 

Bevor man die HiRes-Grafik auf dem C64 bewun- 
dern kann, sind einige Schritte erforderlich. Zu- 
nächst muß die Grafikbetriebsart eingeschaltet wer- 
den. Danach sollte man dem VIC mitteilen, welche 8 
KByte als Bitmap verwendet werden. Dafür gibt es 
mehrere Möglichkeiten. Im Commodore Handbuch 
wird 8192 als Startadresse empfohlen. Diese Adres- 
se liegt aber nur 6 KByte über dem Basicstart, das 
heißt, entweder dürfen Programme plus Daten nicht 
mehr als 6 KByte benötigen, oder man verlegt den 
Basicstart nach 16384 und verschwendet damit 14 
KByte wertvollen Speicher. Es gibt noch eine besse- 
re, aber auch kompliziertere Möglichkeit, die in vie- 
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len professionellen Programmen genutzt wird. Man 
legt die Bitmap unter den Basic- und Kernal-ROM-Be- 
reich. Der VIC kann auf diesen Bereich problemlos 
zugreifen, aber um Punkte zu setzen, muß man Ma- 
schinensprachroutinen einsetzen. Während man in 
diesen Bereich schreibt, muß das Betriebssystem 
und damit der Basic Interpreter abgeschaltet sein. 
Entscheidet man sich dafür, kann man auch einfache 
Basicroutinen zum Zeichnen verwenden, allerdings 
etwas Geduld ist dazu nötig. Hier ein Beispiel für ein 
entsprechendes Basicunterprogramm. X, Y und die 
Startadresse der Bitmap (BASE) müssen gesetzt sein, 
dann erfolgt der Aufruf mit GOSUB 1000. 

1000 REM Punkt Zeichnen 

1010 CH = INT(X/8) 

1020 RO = INT (Y/8) 

1030 LN = YAND7 

1040 BY = BASE+RO »*320+8*CH+LN 

1050 BI = 7-(X AND 

1060 POKE BY ,PEEK(BY) OR (21BI) 

1070 RETURN 


PEEKs und POKEs in Hülle und Fülle 
TR TE NETTER 


Um dem VIC-Chip mitzuteilen, wo die Bitmap liegt, 
braucht man folgende Befehle: 

100 POKE 56578, PEEK(56578) OR 3 

110 POKE 56576,(PEEK(66576)AND252)OR3):REM 
Bank 0—16383 

120 POKE 53272,PEEK(53272)OR8: REM Bitmap liegt 
ab 8192 

130 POKE 53265,PEEK (83265)OR32: REM HiRes ein- 
schalten 1 

Multicolor ist wie immer etwas komplizierter. Zwei 
Farben werden durch den Bildschirmspeicher be- 
stimmt, wie in HiRes. Die dritte Farbe kommt vom 
Hintergrundfarbregister (Adresse 53281) und die 
vierte Farbe steuert der normale Farbspeicher bei 
(Adresse 55296—56295). 

100 POKE 53265, PEEK(53265)OR32: REM HiRes an 
110 POKE 53270,PEEK(53270)OR16: REM Multicolor 
an 

120 POKE 53272,PEEK(33272)OR8: REM Bitmap ab 
8192 

130 POKE 53281,0: REM Hintergrund schwarz 

140 FOR I=1024 TO 2023: POKE 1,18:NEXT: REM 
MC1 ist weiß, MC2 rot 

150 FOR I=55296 TO 56295:POKE 1,16:NEXT: REM 
MC3 ist blau 

Um aus dem Multicolormodus wieder herauszukom- 
men sind folgende Zeilen nötig: 

200 POKE 53265,PEEK(53265)AND223: REM HiRes 
aus 

210 POKE 53270,PEEK(53270)AND239: REM MC aus 
Zugegeben, das ist eine ziemlich umständliche Pro- 
zedur und deshalb scheuen sich viele Programmie- 
rer, den Multicolormode einzusetzen. Zu allem Über- 
fluß ist die Sache in Basic auch noch ziemlich lang- 
sam. Das ist wohl auch der Grund, warum es so viele 


Grafikerweiterungen für den C64 gibt. Zwar erleich- 


18 rem c64 hires: punkt,linie,kreis 
29 paoke 53265,peek (53265) or 32:rem hire 2284 
san 
39 poke 53272, peek (53272) or 8:rem bitma 1913 
p nach 8192 
48 poke 53281,2:poke 53280,2:ba-8B192 1874 
Ss® for i-1224 to 2923:poke i,1B:next :rem 2366 
farben rot und weiss 
68 For i=ba to ba+79939:poke i,®:next :rem 2842 
bitmap loeschen 
70 xi=-160:y1=-25:x2=295:y2=108:gosub 328 3611 
80 x1=-295:41=100:x2=160:y2-175:gosub 328 3874 
98 x1=-160:41-175:x2=25:42=108:gosub 320 3535 
100 x1-25:41=-100:x2=160:y2=25:gosub 3298 3316 
118 rem kreis-routine 
128 cx=169:cy-100:sc=1.16:fl=-9:rd=28 3872 
138 For cr=® to 6.4 step .1 1256 
148 x=rd*cos (Cer):yrrd*sin (cr) 2278 
150 x@=sco*x+cx:yPrcy-y 2379 
4168 if fl=1 then 188 832 
178 x-xE:y-y2:gosub 249: Fl=1:x1=x2:yl=y2 3195 
189 gosub 320:x1=-x2:ul=yu2 1749 
198 next 138 
208 get kS:if k$=""” then 2008 1465 
218 poke 53265,peek (53265) and 223:poke 3673 
53272,21:rem hires aus 
228 print "[Lelr,chm 71”:poke 53281,6:poke 3934 
53289,14 
238 end 128 
©4®8 rem punkt zeichen, "koord. in (x,y) 
258 ch"int (x/8) 903 
268 ro=-int (y/B) 964 
278 In=y and 7 1116 
288 by=ba+tro*328+8*ch+1n 2188 
298 bi=7-(x and 72 1164 
308 poke by,peek (hy) or (2tbi) 1825 
318 return 142 
328 rem linien routine, koord, in (x1,y1) 
und (x2,y2) 
3390 x4=x1-x2:y4=y1l-y2 2907 
340 if x4=® and y4=8 then x=*x1:y=yl:gosub 2973 
248:return 
358 zx--sgn (x4) 738 
368 zy--sgn (y4) 736 
398 if x4=® then r-abs (y4):goto 430 2168 
400 ta=-y4/x4 3r# 
410 th=atn (ta) 949 
428 r=abs (x4/cos (th)) 1395 
4398 y4=abs (y4) sı2 
449 x4=abs (x4) 877 
459 x3=-x4/r*2x:y3=-y4/r*zy 2891 
4680 if r=8 then 518 1822 
478 For lM-1i tor 768 
488 x=xl:y"-yi:gosub 240:rem punkt setzen 1552 
498 xi=x1+x3:41=y1l+y3 2822 
508 next 138 
S51® return 3432 
Listing 3: Unterprogrammsammlung zum Zeichnen von 


Punkten, Linien und Kreisen (C64) 
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tert Simons Basic die Grafikprogrammierung erheb- 
lich, dafür ist es nicht kompatibel zu Basic 2.0. Will 
man seine Programme auf jedem C64 lauffähig ha- 
ben, muß man sich entweder auf Basic 2.0 beschrän- 
ken oder man schreibt sich seine eigenen Assem- 
blerroutinen. Listing 3 enthält eine Basicunterpro- 
grammsammlung, die Routinen zum Zeichnen von 
Punkten, Linien und Kreisen beinhaltet. 

Der C128 ist in dieser Hinsicht viel schneller, dank 
des umfangreichen Basicinterpreters. Damit gibt es 
auch keine Kompatibilitätsprobleme. Basic 7.0 unter- 
stützt praktisch alle HiRes-Möglichkeiten, die der 
VIC bietet. Um beispielsweise HiRes einzuschalten, 
tippt man auf dem C128 einfach GRAPHIC 1,1 ein. 
Diese Anweisung löscht gleichzeitig den Bildschirm. 
Mit GRAPHIC 2,1 erhält man einen HiRes-Bildschirm 
kombiniert mit fünf Zeilen für Textdarstellung im un- 
teren Teil. Im Gegensatz zu anderen Computern 
kann man aber die Anzahl der Textzeilen variieren. 
GRAPHIC 2,1,12 bewirkt, daß das Textfenster ab 
Zeile 12 beginnt. Genauso verfährt man mit Multico- 
lor. Der erste Parameter nach GRÄPHIC muß hier 3 
oder 4 sein, je nachdem ob man ein Textfenster 
wünscht oder nicht. Der 3. Parameter gibt wieder an, 
ab welcher Zeile das Textfenster beginnt. Beim C128 
braucht man sich normalerweise keine Gedanken zu 
machen, wo die Bitmap liegen soll, da es einen Stan- 
dardbereich dafür gibt (ab Adresse 819). Man 
braucht keine Register zu setzen, das übernimmt das 
Betriebssystem. Der GRAPHIC-Befehl erlaubt es, 
auf einfachste Weise zwischen den verschiedenen 
Betriebsarten umzuschalten. 


Modus Beschreibung 
40-Zeichen-Text 

HiRes 

HiRes mit Textfenster 
Multicolor HiRes 

MC HiRes mit Textfenster 
80-Zeichen-Text 
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Die umfassende Marktübersicht für Hobby- 
Elektroniker und Computeranwender, 
klar gegliedert: 


In Halle 5 das Angebot für CB- und 
Amateurfunker, Videospieler, DX-er, Radio-, 
Tonband-, Video- und TV-Amateure, für 
Elektro-Akustik-Bastler und Elektroniker. 

Mit dem Actions-Center und Laborversuchen, 


Experimenten, Demonstrationen und vielen 
3. Ausstellung Tips 
für Computer, : 
Software In Halle 6 das Superangebot für Computer- 
und Zubehör anwender in Hobby, Beruf und Ausbildung. 
Dazu die „Computer-Straße” als Aktions- 
Dortmund bereich, der Wettbewerb „Jugend program- 
18.-22.Februar 1987 mier" und die Stände der Computerclubs. 


Wissen 


Der C128 hat viele sinnvolle Grafikfunktionen. Der 
CHAR-Befehl wurde bereits erwähnt; mit ihm kann 
man Strings im Text- und Grafikmodus ausgeben. 
Der DRAW-Befehl erledigt alles, was mit Linien zu 
tun hat, angefangen beim einfachen Punkt. Seine 
Syntax lautet: 

DRAW farbauelle,x1,y1TO x2,y2,TO x3,y3. . .) 

Eine angenehme Seite des C128 ist die Verwendung 
von optionalen Parametern und Standardwerten. Die 
Farbquelle ist ein Beispiel dafür. Wird für sie kein 
Wert angegeben, wird automatisch Farbauelle |, 
also die Vordergrundfarbe, verwendet; Quelle 0 
wäre die Hintergrundfarbe. In Multicolor kann man 
mit 2 oder 3 die anderen Farbauellen „anzapfen". 
Um einen einzigen Punkt zu ersetzen, reicht ein Koor- 
dinatenpaar aus. Um eine Linie zu zeichnen, kommt 
ein weiteres dazu und so weiter. Der COLOR-Befehl 
setzt eine Farbe für einen bestimmten Modus. Syntax 
COLOR ziel, farbnummer 


Ziel Erklärung 
0 40-Zeichen-Hintergrund 
1 40-Zeichen-Vordergrund 
2 Multicolor Farbe 1 
3 MC2 
4 40-Zeichen-Rand 
5 Textfarbe 
6 80-Zeichen-Hintergrund 


Zwischen zwei Zeichenbefehlen kann die Farbe ge- 
wechselt werden, ohne daß davon die bereits ge- 
zeichneten Teile betroffen wären. 


Alles dreht sich um den Kreis 
RETTEN.) EREREEER 


Der CIRCLE-Befehl kann so ziemlich alles erzeugen, 
was halbwegs rund ist. Kreise, Kreisausschnitte, El- 
lipsen, Polygone — kein Problem. Die Syntax: 
CIRCLE farbauelle,y,x,xr,yr,sw,ew,w,inc 

x,y gibt den Mittelpunkt an, xr den Radius in x-Rich- 
tung und yr den Radius in y-Richtung. Sind xr und yr 
unterschiedlich, wird eine Ellipse gezeichnet. Will 
man nur Kreis- oder Ellipsenausschnitte zeichnen, 
gibt man den Startwinkel sw und den Endwinkel ewin 
Grad (0 bis 360) an. Der Prameter w gibt an, um wel- 
chen Winkel die ganz Figur gedreht werden soll. Um 
Polygone zu zeichnen, kann man mit inc den Winkel- 
abstand zweier Segmente angeben. Listing 4 zeigt 
die vielfältigen Möglichkeiten des CIRCLES-Befehls. 


BOXen — Kein Problem 
BEREREREETETIRITSERFE 


Ein weiterer interessanter Befehl ist BOX. Mit ihm 
kann man beliebig große Rechtecke zeichnen, aus- 
füllen und rotieren. 

BOX farbauelle,x1,y1,x2,y2,wfüllfllag 

xl und yl sind die Koordinaten der oberen linken 
Ecke, x2 und y2 die der unteren rechten; w bestimmt 
wieder die Drehung der Gesamtfigur und füllflag 
gibt an, ob das Rechteck gefüllt werden soll oder 
nicht. 
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Listing 4: Der C128 als Kreiskünstler 
Die Resultate des BOX-Befehls, vor allem zusammen 
mit der Drehung, können recht ungewohnt sein, ein 
Beispiel dafür gibt Listing 5. 

Das PAINT-Kommando füllt eine begrenzte Fläche 
mit Farbe: 

PAINT farbaquelle,x,y‚modus 

x und y sind die Koordinaten eines beliebigen Punk- 
tes innerhalb der zu füllenden Fläche. mode=1 defi- 
niert als Flächenbegrenzung alles, was nicht die Hin- 
tergrundfarbe hat; mode=0 erlaubt als Begrenzung 
nur die Farbe von farbaquelle. 


Virtuelles Koordinatensystem 
BETT TFT BIBETE 
Das SCALE-Kommando selbst zeichnet zwar nichts, 
es kann aber das Arbeiten mit Koordinatensystemen 


vereinfachen. Mit diesem Befehl werden die größten 
erlaubten x/y-Werte für alle anderen Befehle neu 


Listing 5: „BOXen" mit dem C128 
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ag rar Schweiz; Großbritannien: Compu- 
ter News, PC Business World, Computer Business; 
Ungarn: are Aa hal Informatica; Venezuela: 
Computerworld Venezuela; USA: Amiga World, 
Computerworld, inCider, Infoworld, MacWorld, 
Micro Marketworld, PC World, Run, 73 Magazine, 
80 Micro, Focus Publications, Network World. 
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mann, Wolf, Zille, Zunker, kmb Handelsges,., te- 
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board.- 


Gebrauchs- 
Anweisung 


l. Anzeigentext in die vorgedruckten 
Zeilen der Karte schreiben — 
maximal 6 Zeilen mit Anschrift 
oder Telefon-Nummer (pro Buch- 
stabe, Satzzeichen, Wortzwi- 
schenraum = 1 Kästchen). 

2. Rubrik, Bereich und Zahlungswei- 
se ankreuzen, Ädresse auf der 
Rückseite der Karte angeben. 

3. Datum und Unterschrift nicht ver- 
gessen 

4. Karte zusammen mit 5-DM-Schein 
oder V-Scheck über DM 5,— in 
Umschlag stecken. 

5. Umschlag zukleben, ausreichend 
frankieren und abschicken an: 
CW-Publikationen 
— RUNboard — 

Postfach 40 04 29 
8000 München 40 

6. Die Anzeige erscheint im nächst- 

möglichen RUNboard. 


Ich habe die Gele- 
genheit genutzt! 


gm 


Ichhabeam__________ eine 
Gelegenheits-Anzeige im RUN- 

board bestellt. Sechs Zeilen zum 
Taschengeld-Tarif von nur DM 5,— 
inkl. ges. Mehrwertsteuer. Die DM 5,— 
habe ich der Bestellung beigelegt als 


o V-Scheck o Geldschein 


RUNTER 


Disketten-Service 


gm 


Ichhabe am beider 
RUN-o-thek Diskette(n) 
mit den Programmen aus RUN- 
Ausgabe bestellt. 


Preis pro Diskette: DM 21,80 plus 
DM 3,— Versandkosten = DM 24,80 


O Bezahlt mit V-Scheck-Nr. 
Konto-Nummer 
BLZ/Geldinstitut 

© Ich bezahle per Nachnahme. 


WISSEN nur na nn rm TEEN TEE 


definiert. Das heißt nicht, daß dadurch die Auflösung 
vergrößert wird. Syntax: 

SCALE n,xmax,ymax 

n=0 schaltet die Skalierung aus, n= 1 schaltet sie ein. 
xmax und ymax geben die größtmöglichen Koordi- 
naten an (maximal 32767). Verwendet man dieses vir- 
tuelle Koordinatensystem, kann man ein und dassel- 
be Programm in den verschiedenen Auflösungen 
ohne Änderungen ablaufen lassen. Der SCNCLR-Be- 
fehl ermöglicht es, nur den Text-, HiRes-, oder Multi- 
colorbildschirm zu löschen, ohne den Modus zu 
wechseln. 

Ein ungewöhnlicher und leistungsfähiger Befehl ist 
SSHAPE. Mit ihm lassen sich rechteckige Ausschnit- 
te aus einer Grafik in einer Stringvariablen abspei- 
chern. Die Syntax: 

SSHAPE stringvar.xl,yl,x2,y2 

stringvar ist die Stringvariable, die den Ausschnitt 
aufnehmen soll, xl und yl sind die Koordinaten der 
linken oberen Ecke und x2 und y2 die der rechten 
unteren Ecke des Bereichs. Da eine Stringvariable 
hächstens 255 Zeichen aufnehmen kann, ist die Grö- 
ße des Rechtecks begrenzt. Zusätzlich zur Grafik 
wird auch die Farbinformation abgespeichert. 
GSHAPE ist das Gegenstück dazu, das den Inhalt ei- 
ner Stringvariablen wieder auf den Bildschirm 
bringt. Dabei ist auch eine logische Verknüpfung mit 
dem Untergrund möglich. Syntax: 

GSHAPE stringvar,x,y‚mode 

x und y bestimmt die linke, obere Ecke, an der der 
Inhalt von stringvar in die Grafik eingebracht wird. 


Listing 6: Zeichnen mit SSHAPE und GSHAPE (C128) 
In Listing 6 werden die beiden Befehle anschaulich 
demonstriert. Angenehm sind auch die beiden Be- 
fehle BLOAD und BSAVE, mit denen sich ganze Bild- 
schirmseiten auf Disketten abspeichern lassen. 

Ein weiterer wichtiger Befehl ist SPRSAV, mit dem 
entweder der Inhalt eines Spriteblocks in eine 
Stringvariable übertragen werden kann oder umge- 
kehrt. Somit lassen sich Teile des Bildschirms mit 
SSHAPE in einer Stringvariablen abspeichern und 
mit SPRSAV in ein Sprite umwandeln. Eine Technik, 
die völlig neue Möglichkeiten der Grafikprogram- 
mierung auf dem C128 eröffnet. 

Beim C128 gibt es noch eine weitere Grafikmöglich- 
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keit: Ultra-HiRes, die die Vorteile des 80-Zeichenmo- 
dus nutzt, um eine Auflösung von 640 x 200 Punkten 
zu erreichen. Commodore räumt zwar ein, daß die- 
ser Grafikmodus existiert, aber Basic 7.0 hat keiner- 
lei Befehle, um ihn anzusteuern. Man braucht wieder 
einmal Maschinensprachroutinen; allerdings hat 
man den Vorteil, daß man durchwegs im FAST-Mo- 
dus des C128 arbeiten kann. 


Sprites 
Bee v3 


In einem Artikel über die Grafikfähigkeit des C64/ 
C128 dürfen die Sprites nicht unerwähnt bleiben. 
Obwohl beide Geräte genau die gleichen Möglich- 
keiten bieten, ist der C128-Besitzer wieder mal im 
Vorteil, da er die wichtigsten Befehle zum Umgang 
mit Sprites im Basic 7.0 zur Verfügung hat. Beim C64 
müssen PEEK und POKE herhalten. Doch die Sprite- 
programmierung ist nicht so schwierig wie die An- 
steuerung der HiRes-Grafik. Sich verändernde 
Sprites lassen sich einfach erzeugen; dazu muß nur 
der Zeiger auf den Spriteblock so verändert wer- 
den, daß er auf den nächsten Spriteblock zeigt. Da- 
mit läßt sich zum Beispiel ein Vogel programmieren, 
der mit den Flügeln schlägt. Diese Art der Animation 
ist auch in Basic noch schnell genug. Die Bewegung 
des kompletten Sprites ist da schon etwas schwieri- 
ger. Wieder braucht man Maschinensprachroutinen 
oder eine Basicerweiterung. Der C128 hat diese Be- 
fehle bereits eingebaut. 

Es gibt zwei Arten von Sprites, normale und Multico- 
lor. Multicolor-Sprites haben nur die halbe Auflö- 
sung in x-Richtung, aber dafür erweiterte Farbmög- 
lichkeiten. Normale Sprites sind 24 Punkte breit und 
21 Punkte hoch; MC-Sprites sind nur 12 Punkte breit. 
Maximal acht dreifarbige (Multicolor-)Sprites kön- 
nen sich gleichzeitig auf dem Bildschirm befinden; 
dabei sind zwei Farben für alle Sprites gleich, die 
dritte ist frei wählbar. Die beiden Spritearten können 
gleichzeitig sichtbar sein, da man für jedes Sprite 
den Modus separat einstellen kann. Insgesamt vier- 
zehn Speicherstellen kontrollieren alles, was mit 
Sprites zu tun hat. Die meisten davon sind im VIC- 
Chip, nur die Spriteblockzeiger befinden sich in den 
letzten acht Bytes des Bildschirmspeichers. Gleich 
nach dem Einschalten sind das die Adressen 2040 
bis 2047. Als erstes muß das Sprite erstellt werden. 
Im Anleitungsbuch des C64 ist beschrieben, wie 
man das mit Bleistift und Papier macht. Einmal we- 
nigsten sollte man ein Sprite per Hand erstellen, um 
das Prinzip zu verstehen. Danach empfiehlt es sich 
allerdings, einen ordentlichen Sprite Editor für die- 
sen Zweck zu verwenden. Die meisten Editoren wan- 
deln das fertige Sprite gleich in DATA-Zeilen um, die 
man direkt weiterverwenden kann. Nun müssen 
wichtige Parameter voreingestellt werden (siehe 
Listing 7). 2 

Das alles braucht man für den C64, um ein einziges 
Multicolor-Sprite zu definieren, positionieren, einzu- 
schalten und zu bewegen. Es sieht allerdings auf den 
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Ein DATA BECKER Buch 


Open 1, 8, 15 ”S TEST“ Close 1. Entweder 
Sie tippen diesen Befehl im Schlaf vorwärts 
und rückwärts oder er ist für Sie eine Art 
Alptraum. Genauso wie viele andere 
Dinge am Commodore 64, die Ihnen bisher 
den Spaß, den so ein Computer machen 
kann, verleidet haben. Die Lösung heißt 
GEOS. Das große GEOS-Buch hilft Ihnen 
aber nicht nur mit praktischen Tips beim 
Einsteigen in das neue Betriebssystem, son- 
dern bringt auch handfeste Informationen 
- bis hin zum fast hundert Seiten langen 
Kapitel „GEOS INTERN”. Dieses Buch 
wächst mit Ihnen. Auch wenn Sie jetzt noch 
nichts davon verstehen, nach diesem Buch 
verwenden Sie GEOS FAST LOAD in eige- 
nen Programmen, wissen alles über die File 
Struktur und schreiben Programme im 
GEOS-Look. 

Das große GEOS-Buch 

Hardcover, 350 Seiten, DM 49,- 


Ein DATA BECKER Buch 


Maschinensprache ist nicht nur eine 
Sprache für ausgesprochene Freaks. Denn 
nun gibt es ein Buch, mit dem wirklich 
jeder, der sich dafür interessiert, schnell 
Maschinensprache lernen kann: Maschi- 
nensprache für Einsteiger. Kein unver- 
ständliches Lehrbuch, sondern eine aus- 
führliche, leichtverständliche Einführung in 
diese Profi-Sprache, von den ersten Befeh- 
len bis hin zu eigenen, interessanten Pro- 
grammen. Einen Monitor richtig bedienen, 
BASIC-Routinen heranziehen, Befehle und 
Strukturen vergleichen und schließlich 
selbst in Assembler umsetzen - dazu jede 
Menge Beispiele. Mit diesem Konzept sind 
Sie bald in der Lage, die Vorteile dieser 
Sprache voll zu nutzen. Eine echte Chance 
für jeden Interessierten. 
Maschinensprache für Einsteiger 
ca. 350 Seiten, DM 29,- 


Super. Grafik auf dem C 64. Immer noch 
stößt man mit dem C.64 in Dimensionen, 
die man für unmöglich gehalten hat. 
Supergrafik ist der vorerst letzte Beweis. 
Supergrafik auf Diskette, das heißt über 
100 neue Befehle, 16 Sprites, Text und Gra- 
fik gleichzeitig, schnelle, leistungsfähige 
Grafikbefehle mit 2 Grafikseiten, Hires- 
und Multicolor-Grafik. Supergrafik im Buch 
bietet neben einer ausführlichen Einfüh- 
rung in die Arbeit mit Supergrafik zu jedem 
der neuen Befehle Top-Beispielprogramme. 
Außerdem: Funktionsplotter, 3-D-Grafik, 
Hardwaregrundlagen, Grafik-Routinen... 
und schließlich als krönender Abschluß 
eine vollständige Dokumentation des 
Supergrafik-Source-Code. Das Supergra- 
fik-Buch zum C 64 komplett mit Diskette. 
Für alle Grafikfreunde und Spieleprogram- 
mierer. 

Das Supergrafik-Buch zum C64 
736 Seiten, DM 49,- 

Inkl. Diskette 


Sie sind ein gefürchteter Gegner. Unverwundbar und scheinbar nicht zu 
schlagen. Denn Sie verfügen über eine Geheimwaffe: Den DATA BECKER 
Führer zu den aktuellsten C64-Superspielen. Zu weit über 400 Spielen 
nennt er Ihnen alle wichtigen Pokes. Hier erfahren Sie nicht nur die 
Lösung zu 110 Top-Spielen, sondern lernen auch alle raffinierten 
Tricks. Doch damit nicht genug: In diesem DATA BECKER Führer fin- 
den Sie die Kniffe, die nicht im Handbuch stehen, die Geheimnisse, 
die die Anleitung verschweigt - eben alles was ein Spieleprofi 
an Zusatzinformationen braucht. Selbst Spielestop- und Reset- 
schalter sind hier detailliert beschrieben. ‚Wie löse ich die 
besten Top-Spiele?” Die Antwort finden Sie im 
N DATA BECKER Führer C 64-Superspiele. 


N Der DATA BECKER Führer C64-Superspiele 
128 Seiten, DM 19,80 


DATA BECKER 


Merowingeratr. 20-4000 Düsseldorf ‚Te. (0211) 310010 
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18 rem c64 sprite demo 


29 v-5324B8:rem vic basis adresse 764 
38 poke v+39,2:rem farbe rot 1895 
48 poke v+23,08:rem keine y-expansion 863 
S® poke v+29,08:rem keine x-expansion 959 


78 rem sprite daten einlesen 
80 For i-® to 62:read s;poke B32+i,s:next 2713 


98 rem sprite zeiger setzen 


100 poke 2040,13:rem 832/64=13 1027 

118 poke v+8,8:rem x-pos.=® 964 

120 poke v+1,120:rem y-pos.-=1208 19084 

138 poke v+16,peek (v+16) and 254:rem msb a 2) 
loeschen 

148 rem sprite einschalten 

150 poke v+21,peek (v+21) or 1 1738 

. 168 rem sprite bewegen 

170 for i=® to 335 E 1148 

180 if i>255 then poke v+l16,peek (v+16) or 3908 
I:xei=25B, 

198 if i<256 then poke v+16,peek (v+16) 3722 

"and 254: x=i 

2008 poke v+B,x 827 

218 next 13® 

220 poke v+2l,peek (v+21) and 254:rem spri 2347 
te aus 

2308 poke v+B,0 822 

248 goto 130 568 

2568 rem sprite daten 

278 data 08,127,0,1,255,192,3,255,224,3, 4172 
e3l,eey 

280 data 7,217,240,7,223,240,7,217,240,3, 44856 
231,224 

290 data 3,255,224,3,255,224,2,255,160,1, 4294 
127,64 

308 data 1 ‚62,64,0,156,128,0,156,128,0, 4589 
73,0,0,73,0 

310 data 8,62,0,0,62,0,0,562,0,0,28,0 26022 


Listing 7: Sprite-Demo für C64 


ersten Blick schlimmer aus als es nach ein bißchen 
Übung tatsächlich ist. Die Bewegung ist etwas lang- 
sam; wenn man schnellere Sprites braucht, muß man 
mit Maschinensprache arbeiten. Das entsprechende 
Programm für den C128 ist in Listing 8 abgedruckt. 
Es ist gleichzeitig ein gutes Beispiel dafür, welchen 
Vorteil eine Hochsprache gegenüber einer maschi- 


18 rem c128 sprite demo 


28 for i=-® to Bö:read s:poke 3584+i,s: 2914 
next 
30 movspr 1,0,120:rem sprite-position 368 
48 sprite 1,1,8,0,0,0,0 1322 
S® movspr 1,30#15 1117 
60 get key as 4 44e 
78 movspr 1,9040 336 
88 sprite 1,8 564 
98 end 128 
208 rem sprite daten 
218 data 0,127,0,1,255,192,3,255,224,3, 4172 
231,224 F 
220 data 7,217,249,7,223,240,7,217,240,3, 4486 
231,224 
230 data 3,255,224,3,255,224,2,255,160,1, 4294 
127,64 
240 data 1 ‚62,64,0,156,128,0,156,128,0, 4588 
73,8,0,73,0 
250 data 0,62,0,0,62,0,0,62,0,0,28,0 2608 


Listing 8: Sprite-Demo für C128 


nennahen Sprache bietet; in bezug auf Grafik ist Ba- 
sic 2.0 nämlich nicht viel besser als Maschinenspra- 
che, nur wesentlich langsamer. Wenn man dann 
noch bedenkt, daß im C128 schon ein einfacher 
Sprite-Editor eingebaut ist, wird man verstehen, war- 
um die Spriteprogrammierung auf dem C128 viel ein- 
facher und schneller abläuft. 

Insgesamt kann man sagen, daß die Grafikmöglich- 
keit von C64 und C128 fast die selben sind. Der Un- 
terschied liegt vor allem im ungleich größeren Pro- 
grammierkomfort des C128 und seinem größeren 
Speicher, der es erlaubt, viele Grafikseiten und vie- 
le Sprites gleichzeitig im Speicher zu halten. Alles in 
allem verfügen beide Geräte über den einzigartigen 
VIC-Chip und können verblüffende Effekte produ- 
zieren. 


Medizin 
der 
Armut 


Mehr als fünfzig Prozent 
der indischen Dorf- 
bewohner leben unter- 
halb der Armutsgrenze, 
verdienen weniger als 
zehn Mark im Monat und 
haben kaum eine 
Mahlzeit am Tage. Diese 
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Menschen stehen auch 
in der Gesundheitsver- 


sorgung an letzter Stelle. 


Deshalb wurde vor 

zehn Jahren von einem 
indischen Arztehepaar 
ein Entwicklungs- und 
Gesundheitsprogramm 
gestartet, das nunmehr 
60 Dörfer mit rund 
100000 Einwohnern er- 
faßt: Das Modell von 
Jamkhed. Hier wurde mit 
geringen finanziellen 
Mitteln ein Gesundheits- 
system aufgebaut, das 


sieh heute selbst trägt. 
Es umfaßt: Zusatznah- 
rung für Vorschulkinder 
und Mütter, volle Behand- 
lung von Malaria, Lepra, 
Tuberkulose und Augen- 
krankheiten, Vorbeuge- 
maßnahmen, sauberes 
Wasser etc. Die Investi- 
tionskosten für dieses 
Projekt betrugen pro 
Person DM 2,-. 
Informationen zur 
Aktion Brot für die Welt 
Stafflenbergstraße 76 
7000 Stuttgart 1. 


Aktuelle Info: C64/C128 


Das Druckerinterface. 
Läuft mit jeder gängigen Software. 
Garantiert. Achten Sie darauf, bevor 
Sie einen Drucker oder ein Interface 
kaufen, bei dem das nicht gewähr- 


leistet ist. 
92000/G, _ 
jetzt nur noch 148, 7m 


Pufferspeicher für Drucker 
Im professionellen Bereich seit Jahren 
im Einsatz. ya Computer- 
systeme um bis zu 95%. Sofort mit 
vorhandenen Programmen einsetzbar. 


99032, 32KByte: 198,- DM 
99064, 64KByte: 248,- DM 


Lowcost V24/RS232 

Ihr C64/C128 hat bereits eine serielle 
Schnittstelle eingebaut. Mit einem zu- 
sätzlichen Terminalprogramm erzeugt 
dieser Adapter die normgerechten 
V24/RS232-Pegel 


88002: 98,- DM 
Intelligente V24/RS232 


Eigener Prozessor, eigener 64KByte 
Buffer erlauben hohe Datenraten und 
einfache Anwendung. Empfang auch 
bei laufenden Programmen möglich. 


98064, 64KByte: 298,- DM 


Soundbox 

Die meisten Spieptegran ne erzeugen 
faszinierende Töne - doch Ihr C64/128 
bleibt stumm. Soundbox ist der stecker- 
fertige, kompakte HiFi-Verstärker mit 
integriertem Lautsprecher. 

Totaler Musikgenuß. Preiswert. 

95000: nur 78,- DM 


LC-Display 

Kleines alphanumerisches Zusatz- 
display als Kassenanzeige, 
Maschinendisplay usw.. 

Anschluß an Userport. 

81000, 2x16 Stellen: 398,- DM 
81001, 2x40 Stellen: 548,- DM 


Besuchen Sie unser Ladengeschäft: Mo-Fr 10-18h, Sa 10-13h, Di geschlossen 


Internationale Distributoren: 

Belgien: Brother 24651946, Info Univers 52210384 * England: FCC 46073442 

Finnland: Fredex 80324044 * Frankreich: Neol 88623752 * Island: Thor, Reykjavik 

itallen: Matern 457580309 * Niederlande: D&P 23310153 * Österreich: Zahrer 222347671 
Schweden: UG 34053400 * Schweiz: Weber 19302003 * USA: Tectrans 8182853121 


® 
: ® 
theis gmbh 
MIKROCOMPUTERTECHNIK 
0202/505077 Verkauf & Info Winchenbachstr. 3-5 


0202/505070 Technik Hotline 5600 Wuppertal 2 
0202/510444 Ladenverkauf Telex: 859 16 56 
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| Diagramme, 
Etikettendruck, 


Haben Sie einen 


Matrix-Drucker? 
Machen Sie doch einen 


Görlitz Plotterface! 


| 
Plotter daraus: mit dem 


Plotten und drucken Sie 
mit Ihrem Drucker und 
GÖRLITZ PLOTTERFACE. 
Meßkurven, 

optische 


Kennzeichnung, Barcode- 


| Druck, Protokollausdrucke, 


dies sind nur einige Beispie- 
le für den Einsatz. 


Ein einfacher Rechner mit 
Centronics-Schnittstelle, ein 
kleines Programm und das 
GÖRLITZ PLOTTERFACE: 
Damit können Sie Kontakt- 
pläne ausdrucken oder 
Meßdaten in längeren Ab- 
ständen protokollieren. 


Die Beschriftungsmaschine _ 


von Görlitz 


Das neue GÖRLITZ 
PLOTTERFACE besitzt 
die in diesen Bereichen ge- 
bräuchliche Schrift. 


‘ Der Zeichensatz kann in 


Der Etikettendrucker 


von Görlitz 
Mußten Sie bislang Etiket- 
ten auf einer separaten An- 
lage außer Haus drucken 
lassen? 

Jetzt können Sie die bereits 
vorhandenen Drucker ein- 
setzen und völlig unabhän- 
gig Ihre Etiketten selbst 
erstellen. 


Der Protokollplotter 


von Görlitz 


Für Industriebetriebe, La- 
bore und Meßstationen 


| bietet das neue GÖRLITZ 


PLOTTERFACE neue Al- 

ternativen: ständig proto- 

kollierte Meßdaten über 

längere Zeiträume hinweg 

auf der Basis der vorhan- 

denen Drucker. (Vorteil: 

Verarbeitung von norma- 

lem EDV-Papier) 

Best.-Nr. 

8468 GÖRLITZ PLOTTERFACE 
intern DM 648,— 

8469 GÖRLITZ PLOTTERFACE 
extern DM 668,— 


Das Plotterface von Görlitz 
spart teure Beschriftungs- 
maschinen in vielen Berei- 
chen der Industrie. 

Ob Warenkennzeichnung 
für den Transport oder 
Preistafeln im Supermarkt, 
kein Problem für das neue 
GÖRLITZ PLOTTERFACE. 


30 Stufen vergrößert wer- 
den. Dabei glättet das Plot- 
terface die Schrägen selbst- 
tätig; Demoausdrucke auf 
Wunsch. 


Die vielen Schriftgrößen 
und Grafikzeichen lassen 
sich punktgenau positio- 
nieren. 

Ein Seitenspeicher (größer 
als ein guter Farbbild- 
schirm) von 864 x 576 
Punkten steht zur Ver- 
fügung. 


Fordern Sie Ihren 
kostenlosen Katalog an: 


Lange hat man In deutschen Landen 
darauf warten müssen: Eine Amiga- 
version, die auf die hiesigen Verhält- 
nisse zugeschnitten ist. Endlich ist sie 
da. Neben den Hardware-Verände- 
rungen hat sich auch der Umfang der 
mitgelieferten Software geändert. Zu 
den neusten Systemsoftware-Versio- 
nen hat sich das Superspiel „Mind- 
walker" gesellt. 


Beim ersten Betrachten der neuen ÄAmigaversion, fal- 
len drei Veränderungen ins Äuge. 

Der Amiga wird jetzt mit einer deutschen Tastatur 
ausgeliefert. Damit der Benutzer bei amerikanischen 
Programmen keine Probleme bekommt, wird zusätz- 
lich eine Tastaturschablone (zum Aufkleben auf die 
einzelnen Tasten) mitgeliefert. Die dritte Verände- 
rung betrifft eine kleine „Schönheitskorrektur“. Un- 
ter dem Ämigazeichen auf der Frontseite des Gerä- 
tes wurde der Commodore-Schriftzug hinzugefügt. 
Erfreulich ist, daß der Amiga jetzt über ein einge- 
bautes 220-Volt-Netzteil verfügt. Bisher ist er ja im- 
mer noch mit einem sehr voluminösen Trafo ausge- 
liefert worden, der die Betriebsspannung auf die er- 
forderlichen 110 Volt der amerikanischen Norm her- 
abgesetzt hat. Doch nun genug der „Äußerlichkei- 
ten" 


PAL-Modus von der Workbench aus 


Stichwort für den Amiga, so wie er jetzt ausgeliefert 
wird, ist „PAL-Version“. Der Benutzer kann jetzt die 
größere Zeilenzahl des Bildschirms der PAL-Version 
nun auch von der Workbench aus nutzen. Die größe- 
re Zeilenzahl erreicht der Amiga durch sogenannte 
Zwischenzeilen (Interlaced-Modus). Dabei werden 
zwischen die normalen Bildschirmzeilen noch einmal 
„Halbzeilen" gesetzt. Dies bedeutet, daß sich die An- 
zahl der Bildschirmzeilen verdoppelt. Die Zwischen- 
zeilen werden durch einen zweiten „Durchgang" 
des Rasterstrahls über den Bildschirm erreicht. Da- 
bei muß allerdings die Nachleuchtdauer des Bildes 
heraufgesetzt werden, da sonst das Bild zu flimmern 
anfängt. 

Die beschriebene Grundversion des Amiga enthält 
zu einem Preis von 1995 Mark die Zentraleinheit mit 
eingebautem 3%-Zoll-Floppylaufwerk, Speicherer- 
weiterung auf 512 KByte RAM, deutsche Tastatur, 
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Die Ausstrahlung von bösen Gedanken ist tödlich 


Maus und Systemsoftware (siehe unten). 

Der Amiga-Farbmonitor (hergestellt von Phillips) ko- 
stet 995 Mark. Auflösung, Bildschärfe und Bildstabili- 
tät entsprechen der Leistungsfähigkeit des Amiga. 
Selbst bei sehr langem Arbeiten (oder Spielen) vor 
dem Monitor werden die Augen nicht überanstrengt. 
Um dem Stereo-Sound des Amiga gerecht zu wer- 
den, sind im Monitor zwei Lautsprecher seitlich inte- 
griert. 


Die Software 


Zum derzeitigen Lieferumfang gehören sieben 3%- 
Zoll-Disketten. Von den Startprogrammen Kickstart 
und Workbench jeweils die Versionen 1.1 und 1.2. 
Weiterhin enthalten sind „Amiga-Extra 1.2", „Musik- 
Demo" und das Spiel „Mindwalker". 

Kickstart und Workbench 

Die Version 1.2 ist generell schneller, ausgereifter 
und leistungsfähiger als die vorhergehende. Sie un- 


Im Gedächtnis des Wissenschaftlers 


Amiga: dien 


ue Version 


Self-Developnment 
Bonus: 2888 


Die „Scherben der geistigen Gesundheit" 


terstützt die neuen Tastatur-Belegungen und die grö- 
Bere Zeilenzahl der PAL-Version von der Work- 
bench aus. Die Version 1.1 gibt es ebenfalls, da ein 
Teil der erhältlichen Software nur mit dieser Version 
läuft. Auf ihr ist auch das AmigaBasic V1.1 enthalten. 
Extras 

Auf der Amiga-Extras-Diskette sind folgende Einzel- 
programme enthalten: Amiga-Tutor, Terminal, Ami- 
gaBasic Version 1.2 und insgesamt 17 Basic-Demo- 
programme. 

Musikdemo 

Die Demodiskette zeigt die musikalischen Fähigkei- 
ten des Amiga. Zur Wahl stehen 18 Instrumente. Die 
Tastatur dient in diesem Fall als Klaviatur. 
Mindwalker 

Mit dem Spiel „Mindwalker“ präsentiert sich der 
Amiga von seiner besten Seite. Beeindruckender 
Sound, hervorragende 3D-Grafik, abgerundet mit ei- 
ner tollen Spielidee machen das Kennenlernen von 
Amigas Fähigkeiten zum Vergnügen. 

Der Spieler wird in die Rolle eines berühmten Psy- 


Pyramiden“ erlauben den Wechsel zwischen Persönlich- 
keiten 
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chologen versetzt. Sein Patient, ein berühmter Wis- 
senschaftler leidet unter Wahnvorstellungen. 

Das „Ich“ des Wissenschaftlers läßt sich in vier 
Grundtypen aufteilen. Dies sind Mensch, Zauberer, 
Raufbold und Wassernymphe. In diesen Persönlich- 
keiten wandert der Psychologe durch die Einöde 
der inneren Welt des Patienten. 

Das eigentliche Spiel ist dreigeteilt, wobei sich die 
Teile jeweils sechsmal mit höherem Schwierigkeits- 
grad wiederholen. Im ersten Teil bewegt man sich 
im Verstand des Patienten. Auf einer schier unendli- 
chen Gedanken-Ebene muß eine Verbindung zwi- 
schen einem ‚„kristallisierten Gedanken" und einem 
blinkenden Quadrat hergestellt werden. Dieser 
Weg nennt sich „Pfad des zusammenhängenden Ge- 
dankens". Ist dies gelungen, öffnen sich „Röhren“ in 
den nächsten Level. Nach einem tiefen Fall landet 
der Psychologe im Gedächtnis des Patienten. 

In einem Nerven-Feld müssen sieben „Scherben der 
geistigen Gesundheit" gefunden und zum Ausgangs- 
punkt zurückgebracht werden. Natürlich ist diese 
Aufgabe nicht so einfach zu lösen, wie es im ersten 
Moment erscheint. Bösartige Viren versuchen dem 
Arzt Energie zu entziehen. Einzige Waffe in diesem 
Kampf ist ein Gedanken-Reflektor. Hat man den Aus- 
gangspunkt wieder erreicht, geht die Reise weiter 
ins Unterbewußtsein. 


Puzzle im Unterbewußtsein 


Hier müssen die Überreste der geistigen Gesund- 
heit in einer Art Puzzle geordnet werden. Da das da- 
für zur Verfügung stehende Feld 42 Einzelteile auf- 
nimmt erscheint die Aufgabe im ersten Durchgang 
fast unmöglich. Aber keine Angst, Sigmund Freud 
kann helfen. 

Mindwalker ist eines der interessantesten Spiele, die 
man bisher auf Computern sehen konnte. Hat man 
erst einmal die recht komplizierte Aufgabe verstan- 
den, steht dem ungetrübten Spielspaß nichts mehr 
im Wege. 

(rg) 


Sidecar im professionellen Einsatz 


Aus technischen Gründen muß der Bericht über 
den professionellen Einsatz der Sidecar-Erweite- 
rung für den Amiga leider entfallen. Sie finden die- 
sen Bericht in der nächsten Ausgabe der RUN, wo- 
bei er um einen Test von PC-Harddisk-Karten er- 
weitert wird. Diese Festplattenlaufwerke können 
sowohl vom Sidecar als auch vom Amiga genutzt 
werden. 
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Die drei Teile, „Colossal Adventure", „Adventure 
Quest" und „Dungeon Adventure" bauen aufeinan- 
der auf, können jedoch unabhängig voneinander ge- 
spielt werden. Nur wer den Titel „Supreme Adven- 
turer" erreichen will, muß die Reihenfolge einhalten 
und jeden Teil mit der Maximalpunktzahl abschlie- 
ßen. Der Wortschatz umfaßt zirka tausend Wörter 
und ist damit wohl einer der umfangreichsten bei ei- 
nem Grafikadventure. Beeindruckend ist die Schnel- 
ligkeit des Parsers. Selbst längere Texteingaben 
werden fast augenblicklich analysiert und beantwor- 
tet. Darüber hinaus verfügt die Amiga-Version über 
einige Funktionen, die über den üblichen Rahmen 
hinausgehen. Durch den relativ großen Speicher- 
platz des Amiga kann der Spielverlauf im RAM zwi- 
schengespeichert werden. Dadurch wird beispiels- 
weise ein OOPS-Befehl möglich. Sollte man einmal 
einen verhängnisvollen Fehler begangen haben, 
kann man damit mehrere Spielzüge zurückgehen 
und einen anderen Weg einschlagen. Neben dem 
üblichen Abspeichern des Spielstands auf Disk ist es 
auch möglich, mit RAM SAVE und RAM RESTORE 
eine erreichte günstige Spielposition im freien Spei- 
cherbereich abzulegen und von dort aus immer wie- 
der zu starten. Schließlich gibt es noch die Möglich- 
keit, zwei der drei Adventureteile auf einmal zu la- 
den und dann zwischen ihnen umzuschalten. Wel- 
chen praktischen Nutzen diese Funktion haben soll, 
ist allerdings schleierhaft. Sinnvoll dagegen ist eine 
HELP-Funktion, die in schwierigen Situationen Lö- 
sungshinweise gibt. Sollte man trotzdem nicht mehr 
weiterkommen, kann man als besonderen Service 
bei Rainbird ein Hinweisblatt anfordern, mit dem die 
Lösung auch des größten Problems möglich ge- 
macht wird. Jeder Ort, an dem sich der Äbenteurer 
befindet, wird durch eine Grafik illustriert, die aber 
wahlweise abgeschaltet werden kann. Die Anzahl 
der Grafiken ist sehr groß, da insgesamt 600 Räume 


Der Eingang zur „Unterwelt“ 
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Die Welt de: 


Drei Abenteuerspiele in einem prä- 
sentiert Rainbird mit „The Jewels of 
Darkness". Ein ausgezeichneter Par- 
ser, eine Vielzahl von Grafiken und 
einige neue, Interessante Spielfunk- 
tionen sind die Kennzeichen der 
Fantasy-Trilogie. 


zu durchlaufen sind. Die grobe Auflösung nutzt die 
Fähigkeiten des Amiga nicht aus. Auch von seinen 
4096 Farbtönen ist nichts zu bemerken, da sich das 
Programm mit jeweils vier Farben begnügt. 

Das Anleitungsbuch beschreibt sehr ausführlich den 
Umgang mit den Programmen und die Funktion des 
Parsers. Zur Einstimmung in die Adventures enthält 
es zusätzlich eine Fantasy-Story mit dem Titel „The 
Darkness Rises". Man muß sie vor dem Spielen nicht 
unbedingt gelesen haben. Allerdings kommt man 
dann und wann in Situationen, wo man die Geschich- 


7 v L 
is lined by woodland trees and y 


ie a stream whi 
‚ to the son 


Einfache Grafiken vermindern den Spielspaß nicht 


te zur Hand haben muß, Hat man nämlich an irgend- 
einer Stelle des Spiels einen tödlichen Fehler began- 
gen, wird man manchmal noch von einem Geist oder 
einem Troll wieder zum Leben erweckt. Dazu muß 
man aber beispielsweise das dritte Wort im fünften 
Absatz des elften Kapitels der Story nennen können. 
Eine solche Reinkarnation kostet Punkte, und es 
kann auch vorkommen, daß man einmal so ange- 
schlagen ist, daß eine Auferstehung nicht drin ist. 

Im Anleitungsheft wird in kurzen Szenarios für jedes 
der drei Spiele eine Vorgeschichte erzählt und das 
Ziel des jeweiligen Adventures vorgegeben. So sit- 
zen Sie in der Story von „Colossal Adventure‘ in ei- 
ner Kneipe, als ein mysteriöser Mann auftaucht. Er 
bezahlt mit einer wertvollen Goldmünze und be- 
hauptet, in der berüchtigten Schatzhöhle Colossal 


Cavern gewesen zu sein. Außer Ihnen will ihm nie- 
mand glauben, denn noch keiner ist von diesem Ort 
lebendig zurückgekehrt. Vielmehr meinen die ande- 
ren Anwesenden, der Fremde sei auf unehrliche 
Weise zu seinem Reichtum gekommen, und wollen 
ihm nun ihrerseits Geld und Leben nehmen. Bevor 
es jedoch dazu kommt, bringen Sie den Mann in Si- 
cherheit, Zum Dank gibt er Ihnen eine Landkarte, 
die Sie zu Colossal Cavern führt. Und hier beginnt 
für Sie das Computerspiel. Ihre Aufgabe: Finden Sie 
die Höhle und heben Sie den Schatz! Ihr Punktekonto 
erhöhen Sie in diesem Adventure, indem Sie Teile 
des Schatzes finden und sie zum Ausgangspunkt zu- 
rückbringen. Auch das Finden und Betreten von Co- 
lossal Cavern bringt Punkte. Einen Extrabonus er- 
halten Sie am Ende des Spiels, wenn Sie die SAVE/ 
RESTORE-Funktion nicht benutzt haben. 

Der zweite Teil der Trilogie, „Adventure Quest", 
spielt einige hundert Jahre später. Das Leben der 
Leute im Land ist ruhig und friedlich verlaufen. Jetzt 
jedoch herrscht Unruhe. Nach einer Mißernte im 
vergangenen Jahr beginnen wilde Tiere in die Nord- 


Durch einen riesigen Schlund ins Höhlensystem 


provinzen einzufallen. Die Menschen fliehen nach 
Süden. Truppen, die in den Norden gesandt werden, 
um Ordnung zu schaffen, werden aus Hinterhalten 
angegriffen und dezimiert. Eine riesige Armee der 
Orcs marschiert ein, angeführt von dem gefürchte- 
ten Magier Agaliarept, der als unbesiegbar gilt. In- 
nerhalb einer Woche soll sich das Land ergeben. 
Nun wird Ihnen, der Sie in die Rolle eines Zauber- 
lehrlings geschlüpft sind, die entscheidende Aufga- 
be übertragen. Sie sollen die vier Element-Steine fin- 
den, mit denen Sie den Schwarzen Turm, die Resi- 
denz von Agaliarept, betreten können. Wenn Sie das 
Lebens-Amulett in Ihren Besitz bringen, wird es Ih- 
nen auch möglich sein, den Herrn der Dämonen zu 
besiegen. Punkte machen Sie in diesem Adventure- 
teil, wenn Sie sich dem Schwarzen Turm nähern und 
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benteuers 


ihn betreten, und wenn Sie einen der vier Element- 
Steine aufnehmen. 

Der dritte Teil des Abenteuers beginnt einen Tag, 
nachdem Agaliarept geschlagen wurde. Ein zweiwö- 
chiger Karneval ist angeordnet. Sie überlegen, daß 
Agaliarept sicherlich sehr reich war und daß nun 
sein Schatz unbewacht in seinem Stützpunkt liegen 
müßte. Darüber hinaus haben seine Soldaten bei 
Plünderungen in den Nordregionen wegen des eili- 
gen Marsches wohl einiges übrig gelassen. Hier, so 
denken Sie, müßte noch etwas zu holen sein. Sie bre- 
chen nach Norden auf, um sich die Schätze zu holen. 
In einem Wald ereilt Sie jedoch ein Zauberspruch. 
Sie fallen in tiefen Schlaf. Als Sie aufwachen, befin- 
den Sie sich, ausgeraubt, ohne jede Ausrüstung an 
einem Flußufer unter einer Brücke. Das Adventure 
beginnt. Ihr Punktestand erhöht sich, wenn Sie sich 
Kostbarkeiten aus dem Schatz Agaliarepts aneignen, 
und wenn Sie drohende Gefahren beseitigen. 

Für alle drei Adventureteile gilt, daß Zaubersprüche 
eine Rolle spielen und daß man alles genau untersu- 
chen sollte. Fast jeder Gegenstand hat irgendeine 
Bedeutung und wird irgendwo im Adventure benö- 
tigt. Man sollte also alles mitnehmen, was nicht niet- 
und nagelfest ist. Und selbst Gegenstände, die zu 
schwer zum Transportieren sind, sollte man mit ge- 
eigneten Hilfsmitteln zur Seite rücken, um eventuell 
Brauchbares zu entdecken. Natürlich ist die Anzahl 
der Dinge, die man tragen kann, begrenzt. Da man 
aber im Spielverlauf mehr Gegenstände benötigt, als 
man eigentlich bei sich haben kann, muß man sich 
weitere Möglichkeiten überlegen, wie man die Ge- 
genstände transportiert. Die drei Adventures verlan- 
gen Einfallsreichtum und Erfindungsgabe, wenn es 
darum geht, alle benötigten Gegenstände zu finden 
und richtig einzusetzen. 


Programmname: The Jewels of Darkness 


Spieltyp: Adventure 
Computer: Amiga 
0 l 2 3 4 5 
Idee/Story: 
Grafik/ Animation: 
Sound/Sprache: 
Schwierigkeitsgrad: 
Spielspaß: 
Gesamteindruck: 
Spielerzahl; 1 
Besonderheiten: Adventure-Trilogie 
Hersteller: Rainbird 
Preis: k.A. 


Vertrieb: Rushware 
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fon Waffen 


Das Raumschiff, unterwegs zu den 
Sternen, hat einen Defekt. Es gilt, ein 
Labyrinth aus Gängen, Maschinen- 
räumen, Stahlkammern und Verbin- 
dungsdecks zu durchsuchen. 


Zu finden sind zwölf goldene Kristalle, die eingesam- 
melt und in die Kommandozentrale verbracht wer- 
den müssen, um das Schiff zu retten. Kleine Welt- 
raumkobolde und giftige Spinnen wollen dem Hel- 
den der Geschichte die Lebenskraft entziehen. Von 
Computerterminals gesteuerte Laserschleusen ver- 
sperren den Weg. Spätestens an dieser Stelle drük- 
ken Ihnen die Autoren eines durchschnittlichen Bal- 
lerspiels eine Ionenpistole in die Hand, mit deren 
Hilfe alle Probleme in Luft aufgelöst werden können. 
Diskovery ist anders — es gibt keine Waffen. Ihre 
Waffe ist Ihr Wissen — in diesem Fall Ihre Kenntnis- 
se der englischen Sprache. Diskovery ist ein Spiel, 
mit dem Kinder (und Erwachsene) spielend lernen 
können, wie englische Wörter richtig geschrieben 
werden. Zur Wahl steht eine ganze Palette von Wort- 
sammlungen und Schwierigkeitsgraden, von ganz 
einfachen Wörtern für den Anfänger bis hin zu Spe- 
zialausdrücken für den Fachmann. Die Lasertore öff- 
nen sich nur, wenn das vom Computer durch Sprach- 
ausgabe vorgegebene Wort richtig buchstabiert 
wird. Auf diese Weise wird der Spieler bis zur Lö- 
sung mit jedem Wort des gewählten Wortschatzes 
mehrmals konfrontiert. Wird ein Wort falsch ge- 
schrieben, erteilt der Computer eine kleine Nachhil- 
fe. Die Grafik ist von einer Qualität, die man man- 
chem normalen Spiel wünschen würde. 
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Englisch lernen 


Vier Charaktere stehen zur Auswahl 
Programmname: Diskovery 

Spieltyp: Lernspiel 

Computer: Amiga 1] l 2 3 4 8 
Idee /Story: 

Grafik/ Animation: 

Sound/Sprache: 

Schwierigkeitsgrad: 

Spielspaß: 

Gesamteindruck: 

Spielerzahl: | 

Besonderheiten: Sprachausgabe 

Hersteller: k. A. 

Preis: k. A. 

Vertrieb: k. A. 


Vor dem Test durcehgefallen 


In der Vorschau auf diese Ausgabe kündigten wir ei- 
nen Test vom „Chessmaster 2000" an. Nach den er- 
sten Spielen gegen den „Meister“ schlug die Freude 
über die schöne Grafik in Enttäuschung über die Lei- 
stungsfähigkeit um. Dann machte sich in einem unbe- 
obachteten Augenblick unser Chefredakteur, der 
gerade die Grundregeln des Schachspiels be- 
herrscht, über den Chessmaster her. Das Programm 
gab nach dem vierten Zug auf (siehe Bild). Das gab 
dann endgültig den Ausschlag, auf einen tieferge- 
henden Test zu verzichten. (rg) 


2m einfachsten bestellen Sie 
mit diesem Coupon. 
usfüllen, abtrennen und 
Susreichend frankiert im 
Kuvert ab die Post an: 


W-Publikationen 
ertrieb RUN 
Postfach 40 04 29 

D-8000 München 40 


Ten gute 


Macht Spaß, ist nützlich 
und kommt 12 mal pro 
Jahr ins Haus. Ein 
Geschenk mit bestem 
Erinnerungswert. 


= PUBLIKATIONEN 


Eine Erste Adresse für die Computerwelt. 


)Geschenk-Abo Bestellcoupon 


Ich verschenke RUN zum Bezugspreis von DM 58,— 
(12 Ausgaben), inkl. MwSt. und Lieferung „frei Haus“, 
Auslandsendpreis: DM/sfr 66,—. 

Luftpostversand auf Anfrage. 


Adresse des Bestellers (Rechnungsanschrift): 
Name Vorname 


Straße, Nr./Postfach 


PLZ Wohnort 


Datum / zn 


Adresse des Beschenkten: 
Vorname 
Straße, Nr./Postiach 


PLZ h Wohnort 


Laufzeit des Geschenkabonnements: 


je Das Abonnement soll sich nach einem Jahr 

automatisch um weitere 12 Monate verlän- 
gern, wenn es nicht acht Wochen vor Ablauf 
gekündigt wird. 

[] Das Abonnement soll auf ein Jahr (12 Ausga- 
ben) begrenzt sein. 


Garantie: 

Ich weiß, daß ich diese Vereinbarung innerhalb von 
8 Tagen bei der Bestelladresse widerrufen kann, 

Zur Fristwahrung genügt die rechtzeitige Absendung 


des Widernufs. Ich bestätige dies durch meine zweite 
Unterschrift. 


Datum Unterschrift 


Gewünschte Zahlungsweise: 


[| Bequem und bargeldlos durch Bankabbuchung 
Geldinstitut 


Bankleitzahl (vom Scheck abschreiben) 


Kontonummer/Inhaber 


Gegen Rechnung, zahlbar sofort nach Erhalt 
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Vordrucke. In diesem Heft finden Sie unsere Karte 


Wollen Sie kaufen oder verkaufen? Dann liegen Sie 
richtig mit Ihrem Angebot im RUNBOARD mit 
preiswerten Kleinanzeigen! Hier finden Sie alles 
rund um Ihren Computer. Wir berechnen für 6 Zei- 


len 5,— DM und für jede weitere Zeile 1 


Benutzen Sie für Ihre RUNBOARD-Anzeige unsere 


Verkaufe Hardware 


Deutsche Zeichensätze (üöäUÖABß) 
Be für MPS 801 und CCP 100 

M 35 (inkl. Porto). Ruf’ an bei 
091 3176 18 (Frank — nur SA & 
SO) bevor sie weg sind .. 


Amiga, 256 K Erw., 2 MB Erw. Side- 
car, 20 MB Winchesterlaufwerk, Ab- 
deckhaube, suche Kontakt zu Ami- 
gausem zwecks Hard- Soft-Infoaus- 
tausch, bald Mailbox für Amiga tgl. 
Tel. 0 60 31-6 1950 


(VC 1841, Farbm. Tastatur) + PAS- 
Be FORTH, S-BASIC, + Liter. PR. 


a. Anfrage Tel. (089) 3 13 22 89 
“eSpeeddos Professional*** Origi- 
nal und neuwertig für DM 125,— ab- 
Eupen Moers 0 28 41/341 17 nach 
Turbo Trans V3.1, 512K Version incl. 
TDK+, unbenutzt zvk. Preis VHS. 
Dolphin DOS, Ne ig DM 140,—, 
l Comm. Maus, Neu DM 85,— Tel. 
062 36/8 83 17 


EPSON RX 80 F/T zu verkaufen, gu- 
ter Zustand DM 640,— Tel.: 061 27/ 
a r ab 18.00 Uhr oder Btx 061 27/ 


Verkaufe YAMAHA CX 5M !!! Su- 
per Angebot 8stimmiger Musikcom- 
as: mit Keyboard statt 2500,— nur 

500 Fr. R. Bäder Guggiweg, 6005 Lu- 
zern, 041/41 54 01 


Verkaufe YAMAHA CX 5M I!!! Su- 
per Angebot 8stimmiger Musikcom- 
u Keyboard statt 2500,— nur 
der, Guggiweg 6005 L Lu- 
= 1a) 5401 
RUN-Hefte (6/84 — 8/86) für 4,50 je 
Heft 64er Hefte (Anfang 4/84 — 7/86) 
für 5,50 DM je Helft, ruft an ab 5.00 
Uhr Tel.: 041 in 1415 


“#ATTENTION !!f** Verk. kompl. 
128 Anlage: C-128, Monitor, Floppy 
1571, Drucker GX80, Epson und 100 
Disks Super Soft alles: nur 2999 SFR! 
C. Roelli, Glockentalstr.. CH-3612 
Steffisbi 


19 BEE HE BEER 
Sonderhefte RUN, 64er, Chip, RUN 
11/84—1/86, STAR NLIO mit Protext 
128 u. Hardcopyprg. DM 750,—, Ata- 
ri-Floppy SF 354, Software DM 330,— 
Tel. 0 61 23/6 26 69 


Verkaufe: C-64 + 1541 + Drucker 
(TXP 8100) + 2 Joysticks + | Lightpen 
+ 156 Disks + 14 Kass. + Endlı 

pier + 1 Buch für 1500,— VHB. Mel- 
det Euch bei 0 29 44/77 19 (verlangt 
Michael) ab 15.00 Uhr!! 

Görlitz Drucker Schreibmasch. Sig- 
ma SM 8000 MP mit Userportkabel u. 
Software mit 1000 Bl. Thermopapier 
u. Netzteil. Gutes Schriftbild. Wegen 
Hobbyaufgabe für 250,— DM Tel. 
021 74/34 83 

l-jähriger Commodore 128 mit Farb- 
bildschirm Modell 1702 günstig zu 
verkaufen! Preissenkung von 40 % 
Bei Interesse schreibt bitte! Wolf, St./ 
Furth 42/8352 Grafenau 


Verkaufe C16 Commodore 16+4 mit 
20 super Spielen im Wert von 350 DM 
mit Datasett für 220 DM 
schrift: Dag Bod 
serstr. 2, Tel: 06131/878271 

Verkaufe * Verkaufe * Verkaufe* 
Dataphon 521C/ kaum benutzt an- 


schlußferti e C64 mit Ori 
ware für DM 225,— Tel.: Ba yV] 
41391 


AMIGA 256 KB Tastatur Maus Text 
+ Graphic, rot + 6 Progr. Disks An- 
wender + Basichandbuch, Ami 
buch von M&T 1700 DM Monitor l 1 
850 DM. Alles zusammen 2500 DM, 
Sebastian Michna, 02 21/44 54 50 


Verkaufe Software 


Wärmebedarfsrechnung 4701/83K- 
Zahlberechnung DIN 4701/83, 
Druckausdehnungsanlage 4751/T4, 
Rohmetzberechnungs-Programm für 
VC64 + 1541 + Drucker je 1000,— 
DM vom Fachmann pr. 040/ 
672.46 46. 


AMIGA IS IT! ASS ist wieder da! — 


DISKSTICKER, druckt PRINT- 
SHOP-Zeichen auf ETIKETTE und 
dBase, eine Superdateiverwaltung. 
Kostenlose Info bei HOFFMANN 

route de Mondorf 9, L-5552 REMICH 


Heimvideothek C-64 verw. bis 2000 
Filme auf Disk/Liste: alpha u. num. — 
schnell u, sicher Disk + Dokum. = 
DM 20,— bei: Rolf Müller, Mieshei- 
merweg 5, 5160 Düren 41 (Info gegen 
Freium.) 


Achtung! Etikettenverarbeitung ETI- 
STAR ist super und schnell! LIGA- 
STAR, die beste Bundesligaverwal- 
tung mit GEM-Design. Info bei Gun- 
nar Habitz, Heidlerchenstr. 2, 2820 
Bremen 71. IISUPERI! 


ick C64*Hk HELP *** DISK/TAPE ** 
Über 30 Topanleitungen in | Pro. F. 
Schepke, In den Pölten 14, 3472 Be- 
verungen | M Disk/Tape + 10 DM 
senden M Kein Schund!  MCode! 3 
*%* Tauschp. gesucht! (Liste) ** 

Musik Composer Module 20,— DM, 
Input 64 Orig.-Ausg. 1.85—11.86, 
Cass. u. Heft je 9,— DM + zahlreich 
Data Becker Bücher + and. Literat. 
Info + Katalog (Rückumschlag!), 
Kuhn, Wiesen 6/8820 Gunzenhausen 


Fast Hackem V30 64 Modus oder 128 
Modus. The best Copier — can copy 
alles für nur 50 DM 


Software für C64 und 128 Wir haben 
alles before in Germany come z. B. 
Xevious-Sanxion - The Pawn — would 
Games — Highlande. Info an Thomas 
Soft, Tsamadou 4, Athina/Greece 


Programme für den C64 (Änwen- 
dung + Tools) und VC20 (Spiele, 
Tools + Anwendung) zu Minipreisen! 

gibt es gegen 80 Pf. (Briefmar- 
ke) bei SF-Soft, Mühlenweg 7, 3401 
Seulingen 
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auf Seite 131 Für weitere Informationen können Sie 
Marianne Gad anrufen, Tel. 0 89/3 60 86-201. 


Anzeigenschluß der nächsterreichbaren Ausgabe 
ist Mittwoch, der 11. Februar 1987. 


*eKTOPGAMES für den C16/C116/ 
Plus 4 15 Stück für nur 100 DM***64 K 
pn sg Mae ea mit Einbauer- 

ärıng für den CI6 für: 50 
DM***Joystickadapter für 5 DM. Info 
bei: 0 23 92/6 27 26/ab 14.00 


DATEI-ASS-128 Univers. Dateiver- 
waltung für C128/80 Zeichen, Assem- 
bler m. Anl. 30 DM (auch . Peter 
Hielscher, Am Wall 22, 4401 Saer- 
beck. 


*#*Weihnachts-Top-Angebot*** für 
PC128: Basic/CPM-Programme, z. B. 
Datei — Text oder Volkslaufauswer- 
tung/Info gg. Rückporto bei Andreas 
Strausfeld, Kuhstr. 29, 4750 Unna-Lü- 
nern Un-4 05 22 

Gebe meine Free-Soft-Sammlung für 
Commodore 64 ab, 30 Disketten nur 
DM 150,—. Tel. 0 40/5 24 57 76 


*Für Handwerksbetriebe + C128* 
Angeb. Rechn. Zahlungserinnerung 
usw. Bis 1600 Pos. speicherbar. Für 1 
oder 2 Laufwerke 1571, Preis: 89,— + 
Vers.Kosten. Info: Tel. 06121/ 
42 64 61 ab 18,00 Uhr 

Suche, verkaufe, tausche Anleitun- 
gen u. Adventure-Lösungen. Z. B. 
Borrowed Time, V, Mindshadow usw. 
Schickt bzw, fordert Liste an: Thomas 
ren Aunelstr. 20, 6200 Wbn.-Dotz- 

im 


gegen 
bach, Prielmayerstr. 16, 7990 Fried- 
richshafen 1 


160 Pokes für nur 10 DM!!! 460 Su- 
ser: + 300 Prg.pokes. Dieses 

cht ec Leben beim Spie- 
Ms ein an ©. Lindhoff, Schelmen- 
graben 7, 6120 Michelstadt 


Spielfreaks Spielführer 
testet und benotet nach versch. Krite- 
rien über 1500I! Spiele v. Action bis 
Adventure 10 DM an C. Lindhoff, 
Schelmengraben 7, 6120 Michelstadt 


VC-20*Geldspielautomat*** Wie in 
on au Kası. Por Für an 13,— DM/ 
ur auf Kass in 2 eıp. Bene 
fen. Geg. NN bei P. Bassu, Walen- 
bachstr. 11, CH-8623 Wetzikon 


Verk. Input 64 1—12/1986 Kass. 
Orig. m. Anl. DM 85, Schein/Scheck 
rtofrei, NN + Porto P. Erdelhoff, 
m Waldweg 8, 4770 Soest, Telef. 
02 31/10 82-323 (8-16. Uhr) oder 
029 21/6 37 95 (ab 17 Uhr) 


Verkaufe 2 Data-Becker-Bücher neu 
Original Brillant Software 5 Disk; Tur- 
bo-Tape-Modul, 2fache en ne 
tine für C64 Expansio: 

terface mit Software, Preis: VB, Tel. 
0 83 72/24 88 


Schweiz C-64 Switzerland Habe 
und tausche immer das neueste auf 
Disk. Top-Software aus England und 
Holland. Schreib an Michael Butsch, 
Baselmattweg 159, 4123 Allschwil/ 
Schweiz 


© Gratis gibt's nichts, aber ich ver- 
kaufe Orig. Wintergames (K) u. Fight 
Night (D). Verkauf an Meistbieten- 
den. Suche 64er Prg.-Servicedisk von 
12/86. Tel.: 02 61/6 02 35 (Markus) 


MMFreesoft für PC-1500MM Info g. 
Rückporto: D. Unverhau, Goebelstr. 
109, 1000 Berlin 13 


Software für den 64er Verkaufe Soft- 
ware f. d. 64er. Wir haben speziell 
Anwenderprg., die Sie suchen. An 
Dieter Boger, Luisenstr. 95a, 52 Sieg- 
bur: 


das außergewöhnliche 
Adventure mit aufregenden Bildern, 
C64, 3 Disketten, 29,95 + NN schrift- 
lich an: H. Schmidt, Louise-Schroe- 
der-Str. 7, 3000 Hannover 61 


Rentenberechnung (BFA, LVA) auf 
dem C64/C128l Bewährtes Pro- 
gramm mit den aktuellen Werten — 
anpaßbar an künftige Jahre! Info geg. 
4— DM: H.-G. Runkel, Bicken- 
bachstr. 62, 5276 Gummersbach 


Verkaufe für C64 folgende Originale 
auf Tape: Ghostbusters 15,—, Ulti- 

synth 20,—, Battle für Midway 20, 
Battle for Normandy 20,— ‚Neociypas 
10,—, Thomas Krupp, Hauptstr, 48 
6835 Brühl 


C64 Original-Progr. + Literatur zu 
verkaufen. Liste ar Freiumschlag 
von: Th. Eggert, Im Stiftallmey 32, 
8960 Kempten 


MRSH-KLASSENVERW. (SS-Dat/ 
Kurslisten/Zeugnisse) jetzt zum Son- 
derpreis für 60,— DMIBIS für 40,— 
DM. W. Müting, Siemensstr. 4, 478 
Lippstadt, Tel. 029 41/1 02 25 


VC 64 und PC 128 Programme be 
Oldenburg, Postfach 11 32, 2190 Cux- 
haven 12 
MRSH-SCHULVERWALTUNG jetzt 
auch für den PC128 (80 Z.). Info ge- 
gen Rückporto bei W. Müting, Sie- 

mensstr. 4, 478 Lippstadt, Tel. 
02941/10225 


Verkaufe Sonstiges 


Verkaufe RUN 1/86—12/86 und 64er 
1/86—12/86 nur komplett DM 35,— + 
Porto, Manfred Bauer, St. Ingberter- 
straße 52A, 6670 St. Ingbert 


Print-Fox Grafik u. Bilder Katalog — 
über 3700 Motive m. Zeichensätzen 
DM 20,— Schein inkl. Porto. W. K. 
Reuter, Unter der Burg 6, 6309 Mün- 
zenberg 2 


VERKAUFE gut erhaltene RUN-Ma- 
gazine, Ausgabe Juni 84 bis Oktober 
85, Stck.-Preis 1,— DM, Tel. Gesch. 
0211/1689003, Tel. priv. 0201/ 
25 56 06 


128D-Gebläse auch zu laut? Erprob- 
te Lösung: Stufenlos regulierbares 
Gebläse. Bild mit ausführlicher Be- 
schreibung, Kostenpauschale von 
DM 10,— an VK, Tannenweg 12. 6074 
Rödermark 

*ik NEWSROOM *** Dt. Anleitung 
mit allen Bildern 15,— DM. Alle 1400 
Bilder der Erweiterungsdisketten 
zus. 10 DM. Oliver Tresselt, Geu- 
lenstr. 98, 4040 Neuss 1, Tel. 021 01/ 
54 4763 


“e000 NEWSROOM #090® 
Deutsche Anleitung 44 S. (A4) mit Bil- 
dem (Clipart S. 1+2) für C64/128, 


APPLE, IBM. 1A-Qualität. Gratis dazu 
ca. 200 Spielepokes für C64. Preis 
20,— inkl. Porto 


000 NEWSROOM-BILDER #0® 
Zusammenstellung von Clip-Art- 
DiskS. 1+2 sowie S. 3+4, jeweils 12 
A4-Seiten. Preis 5,— bzw. 10,— (für 
alle 24 S.) inkl. Porto, per Verr.- 
Scheck oder bar. W. Neumayer, 
Rüppurrer Str. 94, 7500 Karlsruhe 1 


©e FLIGHTSIMULATOR Iee 
Deutsche Anleitung 41 S. (A4) + 4 
Flugkarten (A3) mit Koordinaten aller 
80 Flugplätze. Gratis dazu ca. 200 
Spielepokes für C64. Preis 20,— inkl. 
Porto, per Verr.-Scheck oder bar. W. 
Neumayer, Rüppurrer Str. 94, 7500 
Karlsruhe 1 

ee0o00 PRINTFOX eee®® Zu- 
sätzliche Grafikbilder und 25 neue 
(selbsterstellte) Zeichensätze. Gratis- 
info bei W. Neumayer, Rüppurrer 
Str. 94, 7500 Karlsruhe 1 


Tausche Software 


**Tauschpartner C-64 + C-128 ge- 
sucht Viele Topprogramme und An- 
leitungen. Kein Verkauf. Listen an: F 
Franzwa, Postfach 24, A-5015 Salz- 
burg.*** 

HOT NEW GAMES FOR C64 & 
AMIGA! send your lists to: C64: P/K 
A033359, AMIGA: P/K A033360, 4972 
Löhne. We swap instruktions too! 
VC-20*C-64*PC-128* Tausch/Verk. 
Verk. 40/80 Z.-Plat. + Steckpl. Erw. f. 
VC-20 DM 350,— VB. Suche Tausch- 
partner f. C-64 + PC-128 Prg. auch 
CP/M!! Listen an: R. Terhorst, a.d. 
Windmühle 4, 4224 Hünxe II 


Tausche Hardware 


* VC-20 * VC-64 * C-128 * CP/M * 
Suche zuverl. Tauschpartner f. C-64 
u. 128. Verk. (auch im Tausch) Roos 
40/80 Z. Plat. + Zub. f. VC-20. Evtl. 
VC-64 + 1541, R. Terhorst, A. d. 
Windmühle 4, 4224 Hünxe II 


*iek 5 Spitzenspiele für C16 *** Tau- 
sche Skramble, Bandits at Zero, For- 
mula 1, Tutti Frutti, Mr. Puniverse, su- 
che World Cup u. a. (nur Originalkas- 
setten), Tel. 0 65 75/49 12 


Btx-Modul f. C64/128 + PC 300 DM. 
Lotto-Mitspieler sowie Nebenbenuf- 
ler mit Drucker für Postwerbung ge- 
sucht. Prospektinfo 8 DM. GSG, 5143 
Wassenberg 112 RN, PGiroA Köln 
227 771-508, Tel. 36 00 


Dudelsack neu mit Anleitung DM 
380,—, Tel. 0 21 01/27 36 36 


Amiga 256 K, 1+4 MB, Erw. 20 MB 
Winchesterlaufwerk, Sidecaro... Su- 
che Kontakt zu Amiga-Usern, auch 
Anfängern! Für PC 128 zu verk. Ab- 
deckh. Disks, Boxen, Floppy 1571, 
Tel. 0 60 31/6 1950 

Commodore mini-club Postfach 
13 14, 4150 Krefeld 29. Neues Info-Pa- 
ket kostenlos! Mailbox tgl. 22—6 Uhr 
online 0 28 45/87 14 

C-16, -116, +4-Anwender, Einstei- 
ger Endlich ein Club, speziell für uns, 
Kostenlose Informat. beim hrc e. V., 
DRS: Bauerland 15, 4800 Biele- 
e 


Suche Software 


Suche dringend Videoverwlitg.-Prg. 
Außerdem: Superbase, Printfox, 
Geos und div. Spiele; alles C64. An- 
gebot an: Diepold, Am Kapuziner- 
hölzl 1, 8000 München 50 


mas Hintzen, Heerdter Str, 6, 4040 
Neuss 1, Tel: 02168/7088 o. 
021 01/27 44 65 


Suche Programme f. C-128 drin- 
gend, wie z. B. Vizawrite Classic, 
Open Access (CP/M), dBase usw. 
Biete C-64Superprog. als Gegenlei- 
stung. Listen an: R. Terhorst, A. d. 
Windmühle 4, 4224 Hünxe II 

* AMIGA * gesucht! 
Deutsche Anleitung zu Aztec-C oder 
eventuell Lattice-C. Info mit Preis an: 
Ernst Wlasak, Gerichtsg. 18/16/13, 
A-1210 Wien, Tel.: 02 22/3 85 87 13 


m — 


Suche Sonstiges 


* AMIGA * Suche Erfahrungsaus- 
tausch (spez. in Raum HD-MA,), Tel. 
06227/4699 Bernhard * AMIGA * 
CONTACT * WANTED * 


Suche Peripherie 


“rrSuche***Suche***Suche*** Su- 
che einwandfreie Floppy für C64, 
Tel. 0 68 97/76 49 17. Bitte erst ab 18 
Uhr anrufen. 


ee ze” 


Suche Hardware 


Suche für C64/C128, Programme/ 
Anleitungen/Hardware aller Art. 
Liste an Ralf Sandforth, Hermannstr. 
20, 4790 Paderborn. Suche für C64/ 
C128 


64er DOS für 49 DM. Und viel ande- 
res. Suche kaputte 1541-Floppies. 
Zahle Spitzenpreise. Schaden ange- 
ben + Infos anfordem: Christian Röl- 
li, Glockentalstr. 8B, CH-3612 Steffis- 
BG aoie hie re 
Suche defekte Computer und Peri- 
pherie im Raum Frankfurt und Umge- 
bung! Hauptsächlich Commodore. 
Angebote an Herbert Jaschke, Ra- 
thenaustr. 62, 6057 Dietzenbach, Tel. 
0 60 74/3 31 23 

DM 1000 für gute C128 + Floppy + 
Drucker + Softw. Angebote bis Ende 
1986 an DINANT DEKKER, Min 
Ser 39, NL-7811-GN Emmen/Hol- 
anı 


——— 0000000000 


fur die Weit 


DELA - PRINTER MP/I/180 


Der neue Standard bei Matrixdruckern 


180 Zeichen pro Sekunde 
Grafikfähig 

7k Buffer (Option 15k) 

11 nationale Zeichensätze 

2 Speicher für eigene Zeichensätze 
Epson/IBM-kompatibel 

Traktor und Gummiwalze 

9x9 Punkte Datendruck 

18x20 Punkte Korrespondenzdruck 
8x1920 Punkte im Grafikmodi 
Deutsches Handbuch 

Schnittstelle Centronics-Parallel 
geeignet für alle Computer mit 
Centronicsschnittstelle. Wird von fast 
allen Programmen unterstützt, da voll 
Epson-kompatibel. 


reis: 

MP/\/180 incl. Handbuch + Kabel 
für. Atari ST, IBM 

Amiga, Schneider CPC 


für C64/C128 
mit Userport/Centronics 


für C64/C128/C16/Plus4 
mit seriellem Interface 


Bitte bei Bestellung Rechnertyp angeben 


TELEFON 
. Po 
Elektronik == 
Bestellung und Versand: 
Mocastrichter Str. 23-5000 Köln 1 
Telefon 0221/51 7081 
DELA jetzt auch in ESSEN 
Schützenbahn 11-13 (DG8-Hous, Porschepkatz) 
Telefon 0201/23 67 17 
U} erwünscht! ® 


Einführungsp 


dafür, 

Sie zielbewußt 
Schritt 

halten, erfolgs- 
bewußt 
investieren 


gewiin Dem ı 


Erfolge sind berechenbar, im Computer- 
zeitalter mehr als je zuvor. Machen Sie PC- 
zu Ihrem Informations-Kapital. Jeden Monat 
mit dem kompletten Wissen über PCs 

& Co. PC-Welt vermittelt Ihnen erfolgreich 
den aktuellen Stand allen PC-Know-hows 
— bis ins Detail. Praxisecht und profession 
— inclusive aller wichtigen Wettbewerber. 
Mit den objektiven und aussagefähigen Tests. 
So gründlich, aufwendig und umfassend, 
wie es nur ein Monatsmagazin kann. PC-W 
verhilft zu den richtigen Entscheidungen. 
Darum sollten Sie sich für ein Jahres- 
abonnement der PC-Welt entscheiden — für 
nur 80,— Mark im Jahr*. Dabei sparen Sie 
Heft 83 Pf. im Vergleich zum Kiosk-Preis. 
Das Entscheidende wissen. PC-Welt. 
* Inlandspreis (inkl. MwSt. und Vertriebskosten) 


Ihre starke Verbindung zur Computerw 


Postfach 40 04 29, D-8000 München 40 


präsent sein. 


GEWERBLICHE 
GELEGENHEITEN 


Zählt für Sie jeder Millimeter? 
Als Geschäftsmann für wenig Geld in RUN 


Und so wird es gemacht! Schicken Sie uns Ihren 
Text mit der genauen Firmenanschrift. Pro ange- 


fangener Zeile (1 Zeile = 


Biete an Hardware 


kk#k%#% AMIGA-SHOP kkx%* 
AMIGA 512 KB mit Farbmonitor, 
Maus u. Software — zum Super- 
preis! Deluxe Paint, -Print, -Video 
a208,— Fa. Ruth Tel. 042 44-18 77 


GEISLER GmbH :: Hotline (0211) in 
4000 Düsseldorf 11 : Leostrasse 1 : 
Neujahr, lieber Leser! Hier wieder ein Tal 
unserer Angebote :: GPC 2C-HI-XT, kompl 
Rechner, 640 KB, 20 MB Festplatte, Floppy, 
Service, Garantie, nur DM 2499, (unglaub- 
lich aber wahr) :: COMMODORE AT und 
COMMODORE AMIGA zu unglaublichen 
Preisen. Anrufen und staunen: 20 MB Fest- 
platte, Controller, Kabel, wirklich nur DM 
1088,— (toll nicht?) :: NEC P6, 24 Nadeldruk- 
ker, der leise Alleskönner, DM 1299,— (da 
lacht das Kundenherz) :: STAR Drucker NL 
10 DM 749 (echt super!) :: WORD PERFECT 
4.l., deutsch, On: Eee DM 1089— 
(Hurra!) :: GEISLER'S SOFTWARE KATA- 
LOG, die umfassende Marktübersicht mit 
Spezialpreisen, Schutzgebühr DM 5,— 
(Schein oder Briefmarken) :: GEISLER ist 
Vertragshändler für COMMODORE, TAN- 
DON, BROTHER, THOMSON eng 
botsliste GRATIS anfordern! :; Beachten 
auch weiterhin unsere Kleinanzeigen mit 
den kleinen Preisen! :: Wir wünschen Ihnen 
ein gutes neues Jahr :: Ihre GEISLER GmbH 
«: Hotline (02 11) 57 80 81 


. Hardwarezubehör!! 
4 Epromkarte 256Km.Gehäuse 98,— 
m Dataphon S21-23d 324, 

u Wiesemann 92000/G 134,— 

@ DelaEprommer!Im. Gehäuse 119,— 

m Fertiges Epromlöschgerät 793— 
I Floppy. kompatibelzur 1541  39,— 
= Drucker Okidata ML-182 659,— 
w Preisliste über Hardware, Zubehör 
W und Software gegen Rückporto CV- 
5 Berndt, Goethestr. 59, 6078 Neu-Isen- gg 
= burg, Tel. 061 02/2 59 01 ab 15.00 = 


Münchner Computer 
Commodore © 128/D 


DM 1398, — 
Commodore C 128 DM 648,— 
Commodore C16/64K DM 230,— 
Floppy Disk VC 1551 DM 430,— 
Star NL10 DM 733,— 
Tel.: 089/68 82 26 


SX-64 mit Gar. Tel. 069/68 47 62 


*#%* PROSIT-NEUJAHR-PREISE krr%++ 
FREEZE FRAME MK III, Supercopymode 115DM 
THEFINALCARTRIDGEI,Sparpres 125DM 
THEPOWERCARTRIDGE, neusuper 135DM 
FREEZEFRAME + FINALC zus nur 230DM 
FREEZEFRAME + POWERCzus nur 240DM 
GLOIATE 1-Megabyte Epromkarte 132DM 
SUPER-EPROMKARTE256K, DELA,.nır DM 
Picture-Printer-Modul s/w + color 85DM 
RAM-Floppy 64K, fertigneu 130DM 
3er Userport-Erweiterung, iertig RDM 
Wiesem -Interface C64/128, Centr. 120DM 
Wiesem. DruckerbufferC64/128,32K 183DM 


33 Anschläge) berechnen 


Or. TURBO-MAUS + Grai-Pgm. NEU nur 175 DM 


BEEBOuzEEE £.2Datasetten 4DM 
ASTRO- #Postf. 1330 + 3502 Vellmar 


List a.A.-Best. gegen Vork. 0. NN (+ 4,50) 
NEU: 24-Std,-Bestell-Telefon: (05 61) 88 01 11 


C64 C128 VC20 User Achtung! 
Lichtgriffel mit Programmen und dt. 
Anleitung nur DM 49,— Versand 
gen Scheck/Nachnahme Fordern Sie 
unseren kostenlosen Commodorezu- 
behörprospekt an. 

Firma Klaus Schißlbauer Postfach 
1171C 8458 Sulzbach Tel.: 096 61/ 
65 92 bis 21 Uhr 


Bis zu 35-120 X schneller 
VC64/1541 PC128/1541/1571 
1570 und PC128D 
Laden 202 Blocks 2 — 3 Sekunden 
Saven 202 Blocks ca. 5 Sekunden 
Dateien bis zu 10 x schneller 

TWEIT DAS 


1541 SYSTEM 
PROFESSIONAL DOS 


komplettesSystem abDM 197,— 
Für 128/15710.128D DM298,— 
189,— 
169,— 
INFO an, 


Nachrüstung f. SpeedDos 
Nachr. f. and. Syst. ab 
Fordern Sie kostenl. 
AMIGA 256K Erweiterung 189,— 


World Modem Chip 7910 
erforderl. Quartz 2,4576 
DIP-Schalter 2-fach 
DIP-Schalter 4-fach 
Kleinrelaisixum5 Volt 
Dipl.-Ing. Klaus 

Liebigstr. 28, 4780 Lippstadt 

Tel.: 0 22 38-4 35 56 10—18 Uhr 


Software 

5 Lair 40,— 
NEU! Große Software-ÄAuswahl, 
günstige Preise, Liste bei, DER SOFT- 


73,— 


WAREMANN POSTFACH 19286, 
41 Duisburg 14 
C16/116/Plus4 | -— Techn. Mathe. 


Schulanw. u. Grafikprg. zu reellen 
Preis. Cass/Disk. z. B. Zahntrieb * 
Hydraulik Festigk. E.Technik. Werk- 
zeugmasch. * Bruchrechn * Dreieck 
* Volumen * Super-Grafik-Prg. Kata- 
log 1. DM in Briefm. A. Ristau Peetz- 


weg 9, 3320 Salzgitter 1 
Spektrum 


R Alternate a 5.—%* 
%* Spindizzy 45,— %* 
* iR Golf 2—* 
%* Mission Elevator B—r* 
%* DragonsLair 40,—* 
%* Paperboy 3—%* 
%* Hackerll 42,—%* 


*Versand per NN o. Vorkasse * 


ne u re 


wir DM 7,— zzgl. ges. MwSt. Sie können Voraus- 
kasse per "Scheck leisten; wir schicken Ihnen aber 
auch free eine Rechnung. Weitere Informatio- 
nen gibt Ihnen gerne Marianne Gad, Tel. 089/ 
3 60 86-201. Anzeigenschluß der nächsterreichba- 
ren Ausgabe ist Mittwoch, der 11. Februar 1987. 


Nützen Sie die gewerbliche RUN-Gelegenheit! 


*%*%* AMIGA SOFTWARE +xx* 
FLIGHTSIMULATORI 120.00 
DEFENDEROFTHECROWN 115.00 
PRINTMASTER PLUS 120.00 
INSTANTMUSIC 99.00 
SUPER HUEY 80.00 
CHESSMASTER 2000 90.00 
ULTIMA III 125.00 
HEX 80.00 
MONKEY BUSINESS 60.00 
MEAN 18 90.00 
STARFLEETI 120.00 


Komplette Aufstellung kostenlos er- 
hältlich von Richard Small, Ober- 
höchstadter Str. 53b, 6370 Oberur- 
sel/Taunus, Tel. 06171/83863 


Spektrum Software 
Paperboy 35,— 


1 DISKETTEN 

= 5%”, 48tpi, DM 0,99, 2D 
u 3%'',135tpi, DM3,19, IDD 
& auchandere, bes. Garantie 
MW Allg. Austro-AG, Ringstr. 10 


u D-8057 Eching, Tel.:0 81 33/61 16 
# C16/116 — Plus 4 — Software* 
— 4300 Vokabel Verwaltung- A 

— Text-Adressen-Graphic-Pr 

— Elektrotechnisches-Formel- 
ZAPO-Software, I.B. Kohler, 

Potsdamer Str. 27, 1000 Berlin 45 


C64 BAUFINANZIERUNG C128 
Finanz. Plan mit Steuerersparmis 
Vers. ey ee eB: em BSV, Sonst. D. 
3Seiten DM 129 
STEUERPROGRAMM 86 DM 74 
VEREINSDATEI 500 DM %9 
Info: Klaus Hein, Salzstr. 28a, 8950 
Kaufbeuren, T. 0.83 41/8 1357 


® Anwendungen, Spieleu. Zubehör 
W können Sie bei uns zu fairen 
M Preisen für Ihren C64/C128 0 
Merwerben. z. B. Fakturierung I 
Bnur 39 DM. Gegen 80 Pf. in 
I Marken senden wir Ihnen unse- I 
Mre neueste PRCG-Info. MB-Soft, 
u Estelbergweg 2, 7892 Albbruck 4 


Hallo Amiga- H 
Haufenweise Public-Domain Soft- 
ware für nur 10,— pro Diskette (incl. 
Disk/Porto/Versand!) Ausführliche 
Liste (0,80 Porto) Informations —, usw. 
Austausch: PD-Soft, Pf. 359, 4290 Bo- 
cholt 


Der Software und Zubehör-Versand 
BEBEBEBRCHAIBSBBRmEm 
EB Werner/Deactivators/ Miami Vice # 
Daten Inferno a K 29,— D 8, 
m Die Erbschaft/Montogore aD 58,— 
BEBBBEECIKCIBREuUE] 
EM Legende im Eis/Pfad i. Dschungel 
MRätsel d. 7. Kol. (64K) aK 29-0 
FF rt-Show/Trailblazer aK 29, g 
BREBBHAMICABBBABAEES 
F Tass Tim. i. Tonetown/Sport-Show # 
 Marble Madness aD 78,— 

m Preise zzgl. Versand, Liefere auch g 
F Software für Atari und Schneider. 5 
= mLhUSo angeben. Info bei BER-M 

OFT, Postfach 1415, 2150 - 
r3 Buxtehude anfordern. 4 


VC20+19Kb Schreibautom. Erf. 
Drucker MPS802. Deutsch. Zeichen- 
satz. Textverarbeitung. Disk 19,99 
VC20+3Kb. Helikopter gegen Tank 
Aktionsspiel Disk 9,99. Bestellen bei 
SVS Scholz 5628 Heiligenhaus Marien- 
burger Str. 20, Versandkosten 1,30 
DM. Versand gegen 


“V C64 / C128 « 
Mitgliedslisten, Bankeinzug, Rech- 
zung, Aufkleber, Rundschr., Kasse 

M, Info gegen Freiumschlag: IS 
Soft, Bergf. 21, 8261 Tittmoning 


u EINKOMMEN-/LOHNSTEUER 1986 3 
C64/128. Alle Einkunftsarten, Aus- 
führliche Anleitung. Disk 69 DM (Vor- 
k.o.NN). Aktualisierung 1987 20 DM. 
Info 1.50 DM. DiplFinw. G. Bohnen- 
kamp, Meißener Dorfstr. 3a, 4950 
Minden. Tel. 05 71/3 38 55 ab 19h 


** LOHN- UND EINKOMMENSTEUER ** 
Se Jahresausgleich + Steuerkl.- 

a Feen + Analyse!** 
eerıza +1BM**Cass.60.—DM Disc, 
70—DM Info gg RP Jährl.Ak- 
tu,10,—DM! Horst Ilchen, Niederfel- 


derstr.44, 8072 Mancing 084 59/16 69 


300 Free Soft Prg für C-64 nur DM 
150,—! 069/68 47 62 


PC-FIBU ab 19.— 
PC-SM Business Paket 598.— 
C64/C128FIBU 8.— 
C64-Kunden-/Lief.Buchh. 69.— 
C64/C128-VIZAWRITE—VIZASTAR— 


KATALOG DM 3.—, Fa, Lücker/RU, 
R.-Waoner-Str. 7], 6239 Kriftel 


Lohn + Gehaltsprogramm F. CBM 
64 und andere z. vk. Info + Demodisk 
von F. Spiess, Turbinenstr. 4c, 6800 
Mannheim 31, Tel.: 06 21/72 15 15 


Verschiedenes 


Computerpapier (Zweckform) 
12° x240mm blanko 2000—-DM 49.—. 
Markendisketten (SKC) 100% error 


free, 5,25" 2D 20—-DM 36.—. Porto 


Computer-Etiketten 89x36 mm, 
4000—-DM 39,80. Markendisketten 
en 100% error free, 5,25° 1D 

M 33.—. Versand DM 5.—. Liste 
gratis! CBK-Ulrich Korell, Postfach 
41 01 05-01, 5300 Bonn. 


Bei Sofortbestellung 
benützen Sie bitte die 
von uns vorgesehene 


„Kontaktkarte“ und 
schicken diese direkt 
an die jeweilige Firma. 
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Auf diesen Seiten 
können Sie laufend 
Angebote und neue 
Produkte aus dem 

Hard-, Software- und 

Peripheriebereich 

anbieten. 


„Was gibt’s wo“? 
Wer aktuell informiert 
sein will, findet hier, 
was er sucht. 


STEUERN - MESSEN - REGELN 


mit C 64/C 128 oder PC (ab Jan. 1987) 


für Hobby, Ausbildung u. profession. Einsatz! 


Ihren 


Digitale Eingänge 


Digitale Ausgänge 


Analog 
Eingänge 1 


Analoge Ausgänge 


MANFRED KÜHN Bea ING. 


Friedrich-Ebert-Allee 61 : 2000 Schenefeld 
Telefon 040 - 830 87 38 


C 64 und PC 128 
DAS S/6-MODUL 


* Turbo — Disk-Fioppy 6-Tmal schneller 
* Hardoopy — geuckt Directory ung Textein 


DAS SUPER-PROFI 
BETRIEBSSYSTEM 


* Aemew/Üld — neaktiviert mit new oder 
Reset geiüschne Programme 
* mit Gehäuse für C 64 
Preis nur 
39 DM 


SUPER HARDCOPY- 


* fü = Did — Ourch Alsat oder New zerstörte MODUL 
* SHIFTANUN STOP «= ick das arsın Pro- um Biigschirmunnan 
® Druck Ihre Ni 


‚Grafiken 
* Guns Preis-Leistungs-Verhähnis 
* mit Gehäuse für C 64 und PC 128 


Preis nur 
45 DM 


MODUL S 128 
* ein Super Schneilagernogul für den PC 128 
m rg zu alen Programmen 
. N 
Te Da ano 
* imkikusive Schafen für direkten Zugriff aut 
aan &4’er Modus 
* mit Gehäuse 


Preis nur 


* für Expansionapon 
WERBEPREIS nur 550M _____ 49D0M 


KLEMMER & SCHULTE 


ELECTRONIC geertnen SA1D-13.00R 
Berrenrather Str. 496 
5030 Hürth-Elferen 


Unser Ladenlokal ist MO — FR13— 18.30 


Sie erreichen uns telefonisch unter 
der Nummer 02233/63736 


TERMINPLANUNG 
664/6128 


prof. Programm zum Erstellen, Ändern 
und Ausdrucken übersichtlicher Termin- 
plangrafiken, mit Anleitung DM 78,— 


NETZPLANTECHNIK 
664/6128/PC 


prof. Planungsprogramm, dialogfähig, 
Grafik- und Balkenplanausdruck. Mit 
80s. Handbuch DM 248,— 

PC-Version DM 590,— 


Ausf. Info bei K. Wolf, 
Weitfeldstraße 37, D-7772 Uhldingen. 


2x Super (bleifrei) 
Diskettenprogramme für den VC 64/128 
LowRes-Zeichentrickfiime mit verändertem 
Zeichensatz in Mono- oder Multicolor mit 
Hardcopy auf Epson-kompatiblen 
SCREEN Druckern. Von einzelner Screen 


ib bis zu riesigen Spielfeldern (6x 5 
LIGHT Bildschirmgrößen) einfach mit 
DM 49.— Joystick/Tastatur entwerfen. Wei- 
tere Anwendungsmöglichkeiten: 
Briefe schreiben, auch mit eigenen Schrift- 
zeichen, Layouts entwerfen. — 100 % Ma- 
schinensprache — 
Extrem komfortables und bedienerfreundli- 
ches Spriternovieprogramm. 
Von verschiedenen Fachzeit- 
SPRITE schriften getestet und stets be- 
_ geistert beurteilt. Diverse Sprite- 
LIGHT pics, volle Joysticksteuerung, aus- 
DM 89.— oefeilte Menütechnik, drucken, 
Mono-/Multicolor, scrollen, saven 
etc. Die entworfenen Spritefiles können in ei- 
gene Programme übernommen werden. 
- Versandkosten 3,-/Infos gegen Rückporto - 


Wolfgang Zunker & Uwe Hassepaß G.b.R., 
1000 Berlin 62, Postfach 62 07 26 


«4 « auch 1987 stellen 


wir die Preise für Zubehör 
auf den Kopf! +++ SOFORT 
K.87 anfordern 


Schutzgeb. DM 5,— 
Verrechnung b. Bestellung 


kmb handelsgesellschaft für büro-, 
micro und unterhaltungselectronic 


Post & Verwaltungsanschrift: 
Hampsteadstraße 43 

1000 Berlin 37 

= 030/8 11 80 51 


Ladenverkauf: 
Baerwald/Ecke Bergmannstr. 
1000 Berlin 61 

= 030/6 93 58 86 


Zu der in RUN Heft ..., S. ..., erschienenen Anzeige 


gebe ich folgende Bestellung auf: 


Bitte ich um Information über das Produkt: 


Datum/Unterschrift 


Bitte schicken Sie mir [J Preisliste [J Katalog/Prospekt 


Bitte diesen Coupon direkt an die Firma zuschicken. 


| 


mich 


Ihr Amiga-Spezialist 
hat: 


ext, Floppy nit NEC-Laufwerk 
Lieferb, ab Dez, 86 


Einzelheiten erfahren Sie bei uns. 
Alle Spiele und Anwenderprogramme 


ab Lager lieferbar. 
Händleranfragen erwünscht. 


COMPUTER SOFTWARE CLUB 


A; FR" I, ? 
TEL. 08682-1688 
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re TIONSPREISE "201/99 95 
Disketten: 

5% Zoll 2D Neutral 9,90 10ST 
3a Zoll ID Fuji 29,90 10ST 
3% Zoll 2D Fuji 39,90 10ST 
3% Zoll 2D Nashua 4990 10ST 
Drucker: 


Commodore MPS 801 u. Textverarbeitung 298,— 


Commodore MPS 1000 998, — 
Epson RX 80 498, — 
Epson RX 100 798, — 
Panasonic KX-P 1080 498,— 
Monitore: 

Philips 7502 Grün 248,— 
Philips 8524 Farbe 80 Zeichen RGB 698,— 
Sony KX-14 CP1 1598, — 
Software für Amiga , C64, Atari, 

MSX, IBM auf Anfrage 

Amiga 1000 308, — 
Speichererweiterung 198, — 
C64C mit Geos 498. — 
Floppy 1541 515.— 


Tagespreise und Produkte erfragen 
PC-Computer, Templerstr. 22 
8925 Altenstadt 


OO Tel. 0 88 61/99 66 BROT. Le 


AB-COMPUTER AB-COMPUTER 

A. Büdenbender, Wildenburgstr. 21, 5000 Köln 41 

Hard-/Software für jeden Bereich ATARI/ST/COMMODORE/AMIGA 
Telefon: 02 21/4 30 14 42 


‚Atarı St Amiga Atari St Amiga Atari St Amiga 

‚Atari $t 1040 mit Monitor 1 MByte deutsche Aust 2250,— DM 
Atari Doppelfloppy 2x 726 KBanschlußferiig3,5Z0l 718,— DM 
Atari Einzelfloppy 1x 726 KB Netzteil usw. wie oben 398,— DM 
Atari Computer /Zubehör zu Sonderpreisen sofort lieferbar 

Atari Festplatte 20 MB SH204 nur 1800,— DM 
Star NL 10 mit deutschem Handbuch u. Interf. nur 749,— DM 
1350,— DM 
540,— DM 


NEC PS mit Treiber für Atari St/Amiga deutsche Version 
Citizen 120D Drucker 80 Zeichen IBM/Atari St 
Amiga Computer mit 512 KB voll Pal Version deutsch 2700,— DM 


Amiga Speichererweiterung 256 KB voll kompatibel 
Amiga 2. Laufwerk mit Change/NEC volle Anpassung 
seit Monaten bewährt 3,5 Zoll, anschlußfertig 

Siehe Testbericht in Commodore Weit 11/86 
5Y.-Zoll-Laufwerk Amiga für IBM-Emulator anschlußt. 598,— DM 
Fressoftware Atarl/Amiga Diskette 12,— DM, Disketten 3,5 1DD 
nur 3,50 DM, 2DD 4,50 DM. Wir liefern jede Hardware zum 
Superpreis sowie Software Amiga/Atari/IBM für viele kleine und 
mittlere Betriebe mit Beratung und Service. 

Atari St/Amiga/IBM sind eingetragene Warenzeichen 


148,— DM 


Rennersoft Computer Distribution 


At 


«it, 
INES 


Wir haben für 
Ihren Commodore 
C16/116 und 
Ihren Commodore 
C 64 


GRATIS-L Liste in! eher 


Renner- Soft Ara A3 
Postf. 920 -4440 Rheine 


sich innerhalb von 4 sec. in den Speicher eines Com- 
modore 64/128 einiesen. Ein Grafikausdruck ist auf 
praktisch allen Druckern (MPS 801/802/803, 1525, 
1526, RX + FX sowie ale Drucker mit Espon Grafik, 
HRSc, GP8O, GPIOOVC sowie in Farbäruckern Canon 
A1210, 6700 und Okidata, st.) möglich. 

VIDEO DIGITIZER für IBM, COMMODORE PC (etc.). 
AMIGA.AARL etc. Preis + Infos aut Anfrage 


8000 MUNCHEN 30 - NEKOLAISTR 
KATALOG DM 3,- TöglVersand- Telex 523 2034 


bLYL 18/720 TIL -T’NLSIOHNHWE-MIIWWILIIG ZUST MON LOW DI W- ZUMHDS 


ÖSTERREICH - 1060 WIEN - STUMPERGASSE 34 : TEL.0222/569 41 52 -TELEX 112996 


K x $ Versand 
STAUBSCHUTZHAUBEN 


Für ALLE Computer und Büromaschinen, 
für Drucker, Plotter, Kopiergeräte, Oszillo- 
graphen, für Heimorgeln, Videogeräte 
oder Funkgeräte. Aus unserem Schutz- 
hauben-Angebot: 

VC64, VC84 Il, Floppy 1541, 1570, 1571 
usw. Datasette ä DM 14,00, PC128 
DM 16,50, AMIGA-Schutzhaube 1teil. DM 
40,00. Monitore 1701, 1702, 1801, 1802 
usw. & DM 29,00. Alle ATARI ST Modelle 
DM 22,50 (im Set dreiteil. ATARI ST, SF u. 
SM NUR DM 55,00). Drucker und Plotter- 
hauben je nach Größe bereits ab DM 
16,00. 

Preisliste mit Materialmuster DM 3,— in 
Briefmarken. Versand erfolgt bei Wunsch 
auf Rechnung oder N.N. Unsere Versand- 
kosten betragen DM 5,50 

K #* S Versand Schellhammer 

Kugystr. 7, 8000 München 45 

Tel. 089/3 132977 


Commodore AMIGA (512 K) mit Commodore-Farbmonitor 1081 
.—; Staubschutzhaube für AMIGA m. 1081 


eicraft + Graphiccraft + MS- 
nn ; Floppy-Disk VC 1571 


'arbmonitor Commodore 1901 689. —; Farbmon. Commodore 1801 
Ta mit Ton) anschlußtertig C 64/128 
Commodore SX-64 1479, — : Grafiktablett Supersketch 
Akustikkoppier Dataphon S 21/2 + Kabel + Terminalpr. C 64 

Dataphon $ 21 4/2 229,—: Dataphon S 21/23 

Armbanduhr Seiko Wrist Terminal RC 1000 (kann vom C 64 mit dem 
mitgelieferten Kabel + Terminalprogramm programmiert werden) 
Commodare Plus 4 Computer 199,—; Floppy-Disk VC 1551 
Epson-Drucker anschlußfertig an C 64/128 mit Görlitz-Intertace 8426: 
LX 86 869. FX 800 (Nachfolgetyp für FX 85) 1239, FX 1000 
EX 800 1539, —; EX 1000 1999, —; LO 800 1669,—: LO 1000 
Epson-Drucker anschlußtertig an AMIGA, Schneider PC oder CPC 
1X 86 759,—: FX 800 1129,—; FX 1000 1429, —; IX 800 
EX 800 1429, —; EX 1000 1889, —; LO 800 1559,—; LO 1000 
Traktoraufsatz LX 86/LX 90 75,—; Coloreinbausatz EX 800 
Einzeiblatteinzug für EX 800/FX 85/10 800 
Stardrucker NL-10 anschlußfertigC 64/128 mit dt. Handbuch 

NG- 10 anschlußfertigC 64/128 mit dt. Handbuch 
Schneider CPC 6128 mit Grünmonitor 889,— ; mit Farbmonitor 


Versandkostenpauschale bis DM 1000,—-/darüber): Vorauskasse 
(0M 8,—/20,-—). Nachnahme (DM 11,20/23.20), Ausland (DM 18,——/30,—). 
Lieferung nur gegen NN oder Vorauskasse; Ausland nur Vorauskasse. 
Preisliste (Computertyp angeben) gegen Zusendung eines Freiumschlags. 


CSV RIEGERT 


Schloßhofstr. 5, 7324 Rechberghausen, Tel. (0 71 61) 5 28 89 


Bundesliga live =. 
Briefmarkenverwaitun: 
Character Gene 

Conos Factory .... 


86 .. 
Moneytrans (nur für C128) 
Mau-Mau 
Plot Basic 1520 .. 
Profil 40 (nur für ©12i 
Prof. Brock 
Panne the World ......... 
f rammeammiu 
Schachar chiv "9 


Se: 

Siggl's Kabbala 
Sprite Creator 
Sprite Genie 
un . 


Kostenlosen Katalog anfordern!! 


2% Horst-Dieter Scheiba Soft & Hardwarevertrieb 
- Talstr.26 8901 Dinkelscherben 1; 


MD 1D 5 1/4" Diskette 
ab 100 Stück 1,29 DM pro Stück 


Fuji MF 1DD, 3,5’ Diskette 
ab 100 Stück 8,70 DM pro Stück 


MF 1D, 3,5"' Diskette, No Name 
ab 100 Stück 4,99 DM pro Stück 


Citizien® MPS-10, 160 Z/sec., NLO, 
zu Superpreis von 998,— DM 


OKIDATA-Drucker ML 182, 192, 193 
zu Sonderpreisen 


Wiesemann Interface 92000 G für C64 139,— DM 


Dataphon s21d Akustikkoppler, 
anschlußf. C64 279,— DM 


IBM®-kompatibler Rechner ab 1790,— DM 
Jann-Prologic-DOS 298,— DM 


WIPPERMANN COMPUTER 


Füllekengrund 18, 
4799 Borchen-Dörenhagen 


TELEFON 0 52 93-12 41 


Alle Angebote solange der Vorrat reicht. 
Händleranfragen erwünscht. 
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te-wi Verlag GmbH Telefon 089/1292090 
Theo-Prosel-Weg 1 8000 München 40 


% Video Digitizer «x 


Der F.E.T. Farbvideodigitizer digitalisiert das 
Farbsignal einer Videokamera in Sekunden- 
schnelle in 16 Echtfarben. Die digitalisierten 
Bilder können mit Grafikprogrammen weiterver- 
arbeitet werden. 


Farb-Digitizer 064/128 DM 399,— 
160x200 Pixel, 16 Farben 

Farb-Digitizer CPC6128 DM 48, — 
160x200 Pixel, 16 Farben 

Farb-Digitizer Atari520ST DM 528,— 
384 x 200 Pixel, 16 Farben 

S/W Digitizer 064 DM 295,— 
320 x 200 Pixel, 2—4 Graustufen 

S/W Digitizer IBM XT/AT DM 495,— 


640x 200 Pixel, 2—16 Graustufen 


RGB/Video-Converter für Atari520ST DM 198,— 
RGB/Video-Converter für CPC... DM 221,— 


Videokamera für S/W Digitizer DM 503,— 


Creative Video 
Postfach 1501, 8520 Erlangen, Tel.: 09195/2728 


Vergessen Sie alles, was Sie 
bisher über Backup’s gehört haben 


„Freeze Frame“ hatte in den letzten Monaten einen unglaublichen Ertolg 
Die Verkaufszahlen sowohl in England wie auch im Rest von Europa wa- 
ren Außerst gut und wir haben nun Tausende von zufriedanen Kunden 
Die ständige Weiterentwicklung hat es uns ermöglicht, eine neue Version 
von „Freeze Frame“ auf den Markt zu bringen, die eine Reihe von nützl- 
chen Verbesserungen enthält und zugieich noch mächtiger geworden 
ist. Unsere Tast-Abtellung konnte kein einziges Programm finden, das 
von „Freeze Frame“ nicht kopiert wurde, (Getestet wurden alle Program- 
me, die in England bis zum 1. Juni 1986 erschienen sind.) 

So benutzen Sie „Freeze Frame” 

Einfacher geht es nicht mehr. Sie stecken das „Freeze Frame"-Modul in 
den Expansion-Port des C 64. Wenn Sie den Computer einschalten, er- 
scheint das Titelbüd von „Freeze Frame“. Nach Druck aut „RETURN“ 
verhält sich der Computer ganz normal. Sie können jedes Programm la- 
den und starten, wie sonst auch, egal ob von Kassette oder Diskette. 
„Freeze Frame“ wird erst dann wieder aktiviert, wenn Sie den roten 
Knopt am Modul betätigen. Danach genügt #5, eine von drei Tasten zu 

drücken 
t, „D* speichert eine Kopie des Arbeltsspeichers mit einem Fast-Leader 
versehen auf Diskette 
2, „S” speichert ebenfalls auf Diskette, aber ohne Fast-Leader (falls Sie 
selber schon einen haben) 
3, „T* speichert auf Kassette, abentails mit Fast-Leader 
M 139,— 
DAS WAR'S! 

Alle Programme, die Sie so gespeichert haben, können ohne „Freeze 
Frame“ von jedermann geladen und gestartet werden! 
ERNSTGEMEINTE WARNUNG „Frasze Frame” ist ein extrem mächtiges 
Produkt. Wir weisen darauf hin, daß Sie nur Kopien für den eigenen, per- 
sönlichen Bedarf und keine Raubkopien machen dürfen! 


GHS-Data, Tel. 0 91 28/25 87 
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LEARNING 


% Neue Software für C64 


Super-Adressomat 1986 59,- 
500 Adressen pro Datei, sortiert nach 12 Krite- 
rien, Telefonliste, kinderleichte Bedienung, Drucker- 
anpassung, beschleunigte Ladezeit, lauffähig mit 
Laufwerken 1540, 1541, 1570, 1571. 


Schallplattendatei 29,- 
340 LP’s pro Datei sortiert nach LP, Interpret, Titel, 
Ausdruck von Listen (komfortable Suchroutine). 


Diätwächter 15,- 
überwacht Ihre Diät, errechnet den Kalorienver- 
brauch, über 700 Nahrungs- und Genußmittel ge- 
speichert (Ausgabe auch auf Drucker). 


Basic-Kurs 15,- 
Innerhalb weniger Stunden schreiben Sie Ihre erstes 
Programm; mit vielen nützlichen Routinen. 


Versand per Nachnahme plus 4,- DM Versandkostenanteil 


CAL Software-Vertrieb - Klaus Freitag 
Kalkarer Straße 164 : D-4180 Goch 1 


KK_SOFTWARE * KK SOFTWARE * KK 
WELT DER TATSACHEN 


Ein interessantes und leistungsfähiges Quizspiel mit Risiko-, 
Schnell-, Setz-, Bonusfragen und Joker, sowie SPEEDQUIZ, wo 
Schnelligkeit Trumpf ist. Leicht bedienbarer QUIZEDITOR zum 
Eingeben eigener Fragen, die auf Tastendruck verschlüsselt 
werden, damit Schummler keine Chance haben. Grundversion 
mit 1000 Fragen bis zu 20 000 (zwanzigtausend) erweiterbar 
Ausführliche Anleitung liegt bei 

Best.Nr.: CK 1040 R Dauertiefstpreis 24.90 DM 


SUPERLIGA V 3.2 


Umfangreiches und leistungsfähiges Programm zur Verwaltung 
beliebiger Sportligatabellen. Nützlich für Vereine, Sportreparter so 
wie Privatpersonen. Einige wichtige Merkmale: Verwaltung beliebi- 
ger Tabellen mit max. 21 Mannschaften — Einfache Eingabe von 
Mannschaften und Ergebnissen mit speziellem Editor — Ausdruck 
aller Parameter — Automatische Tabellenberechnung — Berück- 
sichtigung von Nachholspieien — Spezialtabellen (z. B. alle Heim- 
spiele) — Simulation von kommenden Spieltagen, Rückblick auf 
vergangene Spiekage und Tabellen. und und und 

Best.Nr.: OK 1000 A Dauertiefstpreis 24,90 DM 

RISIKOPOKER 

Spannung wie bei einem Original Spielautomaten. große farbige 
Kartendarstellung mit Musikausgabe, überraschend langer 


Spielspaß. 
.::CK 1020 R Dauertiefstpreis 9,90 DM 
* Alle Programme ohne kostenaufwendigen Kopierschutz #* 
Für C64 und C128 auf Diskette, Lieferung per Nachnah- 
me/Vorauskasse/Scheck zzgl. Porto und Verpackung, 
Kto 980666000 BLZ 74380087 Dresdner Bank LA 


KK-SOFT Sebastianstr. 6, 8315 Geisenhausen 


%* DIE BESONDERE SOFTWARE % 


Für Commodore 128: 
— BZ-FINANZ: sehr komfortables Buchhal- 


tungsprogr. (Einnahmenüberschuß-Rech- 
nung) mit außergewöhnlichen Merkmalen 
und Möglichkeiten (statist. Auswertung, graf 
Darstellung, etc.) für Kleingewerbetreibende 
und Freiberufler (Gewinnermittlung nach 
$ 4.3 EStG); auch zur Führung eines Haus- 
haltsbuchs geeignet 
BZ-DATEI 1: Verwaltung elektronischer „Kar- 
teikästen“ mit jeweils 650 „Karten“ 
BZ-HOMÖOPATHIE — umfangr. Programm- 
paket (Repertorisierung von Einzelmitteln; 
Erstellung homöop. Fragebogen: Komplex- 
mitteldatei) für Ärzte, Heilpraktiker und alle 
an Naturheilverfahren Interessierte (auch 
Vers, t. C-64) 
Für C-64 + PC-128 (64er-Modus): prof, Software 
aus den Bereichen Astrologie, Biorhythmik, 
Persönlichkeitstest und Heilpraktikerprüfung 
Fordern Sie unsere ausführl. Informationen an: 


BEATE ZILLE — SOFTWARE 
Berger Straße 272, D-6000 Frankfurt/M. 60 


| tsch Disk, „Chl, 
7,95DM + Nachnane 


alle SPrag.4993 
k e r “ 
ordern ss IÄFOS 


C64 : PC 128 : VC 20 


TEXT menügesteuerte, leicht erlernbare 
Textverarbeitung mit integrierter 
Adreßdatenbank, Selektierung und Steuerung 
nach bis zu 9 verschiedenen 
Kriterien ’ 
FIBU frei def. Kontenrahmen, automati- 
scher Kontenausdruck, Journal, Kre- 
ditoren, Debitoren, Summen- und Saldenliste, 
Gewinn- und Verlustrechnung, 98 
Bilanz, BWA ’ 
LOHN komplette Lohnabrechnung, ‚alle 
Lohnarten, Abrechnungslisten für 
Finanzamt, Krankenkasse, etc., 98 en 
Überweisungsträger ‚ 
; AKTUR integrierte Lager- und Adreßver- 
waltung, Rechnungen, Angebotg, 
Lieferscheine, Umsatzstatistik und 98 
offenePostenliste,biszu3Mahnstufen m 


KOMPLETT nur 198,— 


INFO GRATIS 
HD SOFTWARE & BERATUNGS GMBH 


MITTELSTR! 29, 6308 BUTZBACH 5 
TEL. (0 60 33) 6 06 70 


Das Six-Pack ist out. 


Es lebe das GamePackl 
Für den Commodore 64. 


5 Spiele mit 5seitiger Anleitung. 


Mondlandung: Krater sprengen? Kein 
Problem! 
The 064 Quest: The never ending 
Horrorstory 
Traps: Wer anderen eine Falle 
stellt, wird Sieger sein 
Die Ehe, erster Schritt 
zur Scheidung... 
PANIK!!! Der Cö64er 
zockt alle nieder! 
Und das ganze unter 10 DMII! 
(Für 9,99 Mark!) 
Bei 
Fütterer Software 
Kantstr. 24 
7552 Durmersheim 


Software made in Germany 


Loving64: 


CBM 17 +4: 


PETER ANKENBRAND 


UNTERE MARKTSTRASSE 19 
6114 GROSS-UMSTADT 
TELEFON 0 60 78 / 7 26 40 


Ep 


Im JONIGK 


ag for Gold 14, u. % 

Paperboy 

World Ganes 

Novie Monster 

Crystal Carstel 

Infiltrator 3%,- 152,- eng 

fist II 3%,- /54,- 

ci16 

Power Ball 9,90  VIZAURITE 64 Dn 98,- 
Terracognita 9,%  WVIZA CLASSIC 128 DM 298,- 
Cops + Robbots 19,- VIZASTAR 128 DN 398, - 
Intern.Karate 29,-  VIZANRITE PC DM 298,- 
Trailblazer VIZANRITE ANIGA DM 48,-_ 


über 190 Spiele CI6 - und Anwenderprg. z.B.: TEIT 
ACHTUNG '' - Der Sog könnte Sie erfassen - VORSICHT - 
beim Laden da ait I2facher Turbogeschwindigkeit-Super 
e TURBO TAPE + AZINUTH TAPE (+ Justageband)DM 29,90 

Riesenausvahl an Softvare 

An der Tiefenriede 27 sofort C5J NEWS anfordern 
Tel.Service 0511/0886383 bitte Computertype angeben 
£SJ COMPUTERSOFT JONIGK Händleranfragen erwünscht. 


COMPUTER 
SOFTWARE 


man n wu u men muss; ı me, 


AMATEURFUNK 
UND 


COMPUTER 
FLOHMARKT 
NURNBERG 
MESSEZENTRUM 


9. Mai’87 


8,90 „ 17.00 Uhr 


] COMMODORE 128 DM 36,80° 
* unverbindlich empfohlene Stückpreise 


N 
DM 19,80* 
Neue Halle mit über 5000 qm Fläche 7 C64 DM 29,80* 
Einheitspreis: Jeder Tisch DM 20,- | a’'s Baeir 
Jeder Stand hat freien Stromanschluß® | Simons’s Basic DM 29,80° 
Direkte Zufahrt von allen Autobahnen 
Mehr als 4000 kostenlose Parkplätze 


Ausstellerinformationen und Tischbestellungen: 
HANS KAMMLER (dj 6 nb) | 
Laurentiusstraße 9 » 8500 Nürnberg 60 

Telefon 0911 / 644434 — ab 16,00 Uhr 


een, 


ve 
Fu 


compumask |H_ 


Ihr 616, 6116 und plus/4 


Flugsim. ACE (64k-Version) Cass. 39.— 
(incl. 5.— Versand, für C16/116: ACE, 


= 

8 RE 
“ ie 
Wi B 
E u 
2 [1 
w m 
= w 
EM 64kB-Speichererw., Einbau und Rück- @ 
- porto nur 99.—). 2 
m NEU: C64-plus/4-Spitzen-Software (auch f. g 
m C16/116 m. 64 KB) auf Cass/Disk: m 
m ACE(64k-Version) 39.—/39.— u 
EB MERCENARYI 39.—/49.— 
EM MERCENARYI+IIKomp) 49.-/59— M 
E SABOTEUR 29.-/39.— U 
m JETSETWILLYI 29.—/39.— 
sw INFOCOM-Adv. (ZORKu.a.)Disk ab29— g 
m ASSEMBLER + DISASSEMBLER 49.—/59.— 
MB SUPERFILE (Datei) 29.-/39— M 
M SCRIPT/PLUS(Text) Modul 39—.M 
B CALC/PLUS(Kalkulation)Modul 39 
m Light Pen mit Software 59.—/69.— m 
= 1551 nurnoch 348,— g 
8 Druckerincl. Interface ab39,— 0 
{ und vieles mehr. Info R12 gratis. 6 
= ifi Dipl.-Ing. H. Stechmann 5 
© D-2152 Hormeburg, Postfach 210 m 
1 0.41 63/21 76 oder 0 89/3 50 84 59 1 
5 Sind Sie sprachlos? = 


ah 


PrG. FÜR C64 + C128 — EXZELLENT IN STRUKTUR, 

GRAFIK, SOUND — ALLE PRG. IN DEUTSCH 
EEE een 
GELD — 25 Rechennugiimen aus den Bereichen Anlage — Rentenspanen — Vermögensbildun „ - 
Kapital — en — Lautzet — Amortisation — Wert verlust 


[e dt Geschlecht Artoeitsiesstung erfolgt Bedarts 
echnung amd vegen nd — Ermährung (Fett. Eiweih, kohlatyorale 'o8al 


ont, Vraisasfie, aut Wunsch Ausong DM 56 
2 BESELLSCH SPIELE (Domino, Dame, "Mine Knitiein. Pu, Reaktion, Lotto, 17+4 Hnrer 
A-7, 4 Steine. Minctaurus. Skat) DM 45,— 


12 MEAKTIONSSPIELE (Ablenkmandver, Auto-Crash, Froschleben, Goldmine, Karker, Mäuse 
Raaktismstest, Schvag-Saite, Steine treffen. U-Boot usw DM 36. - 

15 UNTERH. +INTELLIGENZ-PRG. (Aikmtest. A-2-Spmel, Barhyihmen m. Auscruck, \0-Test 

Oramaieon. Kudammufır, Magische Osacrate, Mathe, Superhirn, Türme von Hanoi, Minataurus. 
Phrasendrescher. 4 Steine. Weituhrzeitkarte‘ DM S,- 
ASTROLOGISCHES KOSMOPRDGRAMM 
und Breite. Get -Datum + -Zeit werden 
netenstänge ım Zocakus. Häuser nach K 


von Namen, Geburtsort m, geagr. Länge 
sche Zeit, Aszendent, Medium Cxeli. Pia 
auf Wunsch Ausöruck auf DIN Ad — mt 


ukap (Ephemeriden DM 39.- 

N numenscher und alphabetischer Sortierung von 100 Disken 

Liste, wo weiches File ist M3,- 

DER en ALS SCHREIBMASCHINE — Groß-, Kiein., Brelt-, Nagathr-Schrift, 2-Zeien-Dis 

play. Korrektur, Rand. Signale, Auswurt, Rastzellenmeisung, 6 Oauer-Brieikägle zu rel 
DM 33 


Bes m Auftragsbestätigung, Rechnung. Lieerschei, Mahnung 
jertögung. m. Daten und Konten, Rabatt, Aufschiag ae 
IM 58, 


ww marktgänaige Computer -Haftetiketten ” Wan und 
Aufage-Bestimmang, kmderieichte Gestaltung. Ablage für wederhöten Gebrauch — hernar 
Aoressenite mit Prusr. uch. auch auszugsweise nach ooderten Kräarien wie Beruf, PLZ, 
Moby, Geschiecht © DM 89, — 
USW. > FORDERN SIE MIT FREIUMSCHLAG UNSERE LISTE AN! 

LEI ZZIZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ I ZZ 
jolohienen Preisen, aut Kassette 


RRRERRERRERRERREREEREEFTET ETF TER TFT TFT TRTTTTTERTRRN 


Pereeeeeeeeeeeeeee Eee ee TEE TIERE EEELEELERTERITE EI TTT 


“aarnennnene DREI ZEEIIIEII II 


Was gibt’s wo? 


Auf diesen Seiten können Sie unseren Lesern Ihr Angebot 


bestens präsentieren. 


Die RUN-Leserbefragung hat gezeigt, daß rund 85% der Leser 


die Anzeigen beachten und vor allem 68% Lösungen ihrer 
Probleme in Anzeigen suchen. Wenn unsere Leser also fragen: 
„Was gibt’s wo?“, sollten sie doch auch Ihr Angebot in dieser 
Rubrik finden. 


Mindesteintrag 3mal, pro Schaltung DM 420,—. 


Februar/87 uw 77 


ET 
Elektr. + elektronische Geräte, 


Bauelemente +Werkzeuge 

ELECTRONIC VON A-ZE Bu er, 
Stresemannstr. 95 - Berlin 61 

Telefon (030) 2611164 
TORE NET SET TLEERSLN 


Landolt Computer 


Beratung, Verkauf, Service, Leasing 
Wingertstr. 114 
6457 Maintal-Dörnigheim 


ac N oratur r En = 
Tel. 0 61 81/4 52 93 (Mailbox 48884) 


ST 
ahl a an 
Maria-Eich-Str. 1, 8 München 60, Telefon 089/83 70 21 


a 207 
amba 217 
o\ 420 940 


backup Computervertriebs GmbH 
Gabelsbergerstr. 60, 8000 München 2 


Tarnden cs GÜhreim 


Drucker 
ZENITH Monitore Bormmarere 
Telefon 089/52 40 42/52 46 49 


Benützen Sie für 
eilige Anzeigen 


unseren 
7700 Singen, Freibühlstr. 21-23, Fernschreiber 
Tel. 07731/82020, Tx.: 0793716 5 215 350 comw d 


GC 16/C 116 *® Commodore ® G 16/C 116 = Commodore # C > 116 = Commodore :: GC 16/C 116 ®® Commo 


SE NSATI ON 
füraleC 1I6/C 116 — User: 
Externe RAM-Erweiterung au 64 KBYTES! 


Fertiges Modul für Expansionsport, kein Löten erforderlich! 
Hineinstecken und schon meldet sich Ihr C 16/ C 116 mit: 


60671 BASIC BYTES FREE 


Commodore % 


O 116% 


= © 16/( 
) 


Commodore 
8JOPOLILLIO/ 


Versandpauschale aDM 10,- - Versand nur durch Nachnahme 


Händleranfragen angenehm mil 


Inh. Milan Rajcic 
Hammacherstraße 42 Alte Linner Straße 38 
4300 Essen 1 4150 Krefeld ORGANISATION 
Telefon 02 01/22 41 41 Telefon 021 51/224 20 UND VERTRIEB 


Besuchen Sie uns auf der Hobby-tronic vom 18.—22. Februar 1987 


RR 


O/A 


s- 9Ll 


= C 16/C 116 %& 


® 


ULIO? 


=: Commodore 


“= DlODOL 


G 16/C 116 # Commodore *: C 16/C 116 ®® Commodore = C 16/C 116 = Commodore * GC 16/C 116 :® Commodore :& GC 16 


Wenn die Raumfahrttechnologie ebenso rasant 
fortgeschritten wäre wie die Computertechnologie, 


dann könnte dies 
heute der 


Blick aus 
Ihrem 


Büro- 
fenster 
sein. 


Nie zuvor in der Geschichte der Menschheit sind 
Anstrengungen auf technologischem Gebiet so rapide 
vorangetrieben worden, wie in der Computer-Industrie 
der letzten 40 Jahre. Um mit derartigen Entwicklungen 
Schritt zu halten, bedarf es aktueller und zuverlässiger 
Informationen. 


Und da genau setzen wir an. Wir, die CW Communica- 
tions Inc., weltweit größter Herausgeber von Computer- 
Fachzeitschriften. Mehr als 12 Millionen Menschen auf 
der ganzen Welt verlassen sich auf unsere Informationen. 


Wenn Sie Ihre Produkte oder Dienstleistungen weltweit 
oder national vermarkten, dann können wirhelfen. 


Wir helfen Ihnen, die EDV-Verantwortlichen von Mit- 
tel- und Großbetrieben zu erreichen. Wir haben insgesamt 
27 Publikationen für diese Zielgruppen in Argentinien, 
Asien, Australien, Brasilien, Bundesrepublik Deutsch- 
land, Chile, Dänemark, Finnland, Frankreich, Groß- 
britannien, Indien, Israel, Italien, Japan, Süd-Korea, 
Mexiko, Niederlande, Norwegen, Österreich, Saudi 
Arabien, Spanien, Schweden, Schweiz, Ungarn, U.S,A., 
Volksrepublik China, Venezuela. 


Wir helfen Ihnen, Kontakt zu knüpfen zu Wiederver- 
käufern, also System-Häuser, Software Häuser, VAR’s, 
Distributoren, Händler und andere, die Ihre Computer- 
Produkte weiterverkaufen. Wir haben Publikationen die 
dieses Marktsegment in der Bundesrepublik Deutschland, 
Frankreich und U.S.A. erreichen. 


Wir helfen Ihnen, die Profis im Bereich Communica- 
tions zu erreichen, die für Daten-, Sprach und Video- 


Communication verantwortlich und in Unternehmen aller 
Größenklassen vertreten sind, mit unseren Publikationen 
in Asien, Australien und U.S.A. 


Und wir helfen Ihnen, die PC-Anwender anzuspre- 
chen, entweder über unsere allgemeinen Microcomputer- 
Zeitschriften, oder über unsere produktspezifischen 
Magazine. Wir decken diese Zielgruppe in 19 Ländern ab: 
Argentinien, Australien, Brasilien, Bundesrepublik 
Deutschland, Chile, Dänemark, Finnland, Frankreich, 
Griechenland, Großbritannien, Israel, Italien,:Nieder- 
lande, Norwegen, Spanien, Schweden, Volksrepublik 
China und U.S.A. 


Entdecken Sie, wie einfach es ist, Ihre Zielgruppe in 
diesen Märkten zu erreichen. Wenn Sie Computer und 
verwandte Produkte sowie Dienstleistungen anbieten, 
können Sie von unserem Anzeigen-Service profitieren, 
der Sie direkt zu Ihren Kunden bringt. Rufen Sie Frau 
Kaiser unter (089) 3 60 86-0 an, um mehr darüber zu 
erfahren. Oder schreiben Sie an nachfolgende Adresse: 


CW RS PUBLIKATIONEN 


CW-Publikationen GmbH 

Brigitte Kaiser 

Postfach 40 04 29 

Rheinstr. 28, 8000 München 40 

Tel.: (089) 36 086-0, Telex: 5 215 350 


Eintippen ohne 
Fehler 


In RUN werden zwei Arten von 
Programmen veröffentlicht: Basic- 
programme und Maschinenpro- 
gramme. 


Basicprogramme werden zur 
Vermeidung von Tippfehlern am 
besten mit dem Korrektor einge- 
geben. Nach jedem RETURN gibt 
er eine Prüfsumme aus, die mit 
der Prüfsumme im Listing über- 
einstimmen muß. 


Die Basiclader zu den Korrekto- 
ren für den C64 und den C128 ste- 
hen auf Seite 82. Nach dem Einpo- 
ken der Daten aktivieren sie den 
Korrektor. Anschließend ist NEW 
einzugeben. Auf Wunsch spei- 
chern sie den fertigen Korrektor 
auch ab. Er kann dann mit LOAD 
"49152 KORREKTOR",8/NEW/ 
SYS 49152 für den C64 und mit 
BLOAD "4864KORREKTOR128"/ 
SYS 4864 für den C128 gestartet 
werden. Der C64-Korrektor arbei- 
tet auch mit Simon’'s Basic. Dazu 
läßt man das erste Komma in Zeile 
5000 weg. Simon's Basic muß vor 
dem Korrektor gestartet werden. 
Der Basiclader des Korrektors für 
den C16/116/Plus/4 steht auf Sei- 
te 83. Er verfügt über keine eige- 
ne SAVE-Routine. Nach RUN kann 
man beim entsprechenden Hin- 
weis den fertigen Korrektor ab- 
speichern. Nochmaliges RUN star- 
tet das Programm. 


data a9,00,8d,af,cf,8d,b0®,cf, a9 
data Bd,bil,cf,Bd,b4,cf,8d,bS, db 
data cf,85,5c,85,5d,a2,f8,Be, 
data b2,cf,88,68,8d,b3,cf,08, 


for a=-43152 to 49176 step 
8:5=-d:c=-Bd:for b=® to 7: 


gosub 600848 


60818 s=-s+th+l-c:c=s>255: s=-255-8 
and 255:poke a+tb,h+l:next 


b:gosub 600848 


600222 f$="pruefsumme ok”:if s<> 
h+l then f$="[rvs] 


Steuerzeichen sind bei den Basic- 
listings immer in Klartext über- 
setzt, so bedeutet [3LEFT], daß 
dreimal Cursor links gedrückt 
werden muß. 


Maschinenprogramme können 
nicht direkt eingegeben werden. 
Dazu ist ein eigenes Programm nö- 
tig. Hier gibt es zwei gleichwerti- 
ge Möglichkeiten: Basiclader 
oder Hexdump. 

Ein Basiclader ist ein Basicpro- 
gramm, das ein Maschinenpro- 
gramm im Speicher unterbringt. 
Dazu werden die Zahlen, aus de- 
nen das Programm besteht, aus 
DATA-Zeilen ausgelesen und mit 
dem POKE-Befehl in den Speicher 
geschrieben. 

Bei einem Hexdump liegen die 
gleichen Zahlen in hexadezimaler 
Form vor. Sie werden beim C64 
mit einem speziellen Eingabepro- 
gramm, dem Checker (Seite 84), 
im Speicher abgelegt. 

RUN druckt Maschinenprogram- 
me für den C64 als kombinierte 
Hexdump-Basiclader ab. Damit 
werden zwei Fliegen mit einer 
Klappe geschlagen: Dasselbe 
Listing kann einmal als Basiclader, 
einmal als Hexdump betrachtet 
werden. Der Leser kann sich so 
die Eingabemethode aussuchen, 
die ihm am meisten zusagt. Listing 1 
zeigt ein solches Doppelprogramm. 
Es legt ein Beispielprogramm von 
32 Byte Länge im Bereich ab 49152 
($C000) ab. Listing 2 und 3 zeigen, 


FEREEEEEREEEEEEEITENERTTTERE KO Pr eK tor vr rare ET 


welche Teile vom Listing | jeweils 
wichtig sind, wenn man das Pro- 
gramm als Basiclader nutzt oder 
wenn man es als Hexdump ver- 
wendet. 


Für den Basiclader ist alles von In- 
teresse, außer den Angaben 
„C000" bis „C018" ganz links. Sie 
sind unbedingt wegzulassen! Üb- 
rig bleiben vier Basiczeilen mit 
den Nummern 10 bis 40, die Hex- 
zahlen als DATAs enthalten. Ab- 
schließend ist noch der Teil mit 
den Nummern 60000—60090 in 
Listing 1 einzugeben. Er liest die 
DATAs und poket sie in den Spei- 
cher. Dieser Programmteil ist bis 
auf Zeile 60000 bei jedem Hex- 
dump-Basiclader gleich. Er ist mit 
Prüfsummen für den Korrektor 
versehen. Bei den DATA-Zeilen 
wurde darauf verzichtet, da der 
Basiclader über ein eigenes Prüf- 
system verfügt, das Eingabefehler 
weitgehend verhindert. 


Bei Verwendung als Hexdump 
muß der Checker benutzt wer- 
den. Einzugeben sind dann nur 
die Hexzahlen (siehe Listing 3). Es 
fallen also die Basiczeilennum- 
mer, das Basicwort DATA dahin- 
ter und die Kommas zwischen den 
Hexzahlen weg. Die Hexadezimal- 
adressen „C000" bis „C018" brau- 
chen auch nicht eingetippt zu wer- 
den, da sie vom Checker geliefert 
werden. Sie sind nur zur Orientie- 
rung abgedruckt. Ebenso entfal- 
len die Zeilen 60000—60090. 


pruefsummenfehler”:f=f+1 
gosub 68898:next a:print ” 
Cdown)”’f”fehler”:end 

read h$:gosub 690058: h=1* 


16:h$=mid$ Ch$,2) 


l=-asc (Ch$+”"x”)-4B:if 1<O 
or 1>22 then 602080 


if 1<18 then return 


5034 


l-1-7:if 1>9 then return 
f$=-"[rvsleingabefehler”:1- 


®:£=f+1 


5699 


print "zeile” peek (64)* 


856+peek (63)Ff$:return 


Listing 1: Beispiel für einen kombinierten Hexdump-Basiclader 


10 data 
28 data 
30 data 
408 data 


Listing 2: Beim Basiclader entfallen 


die Adressenangaben links 


80 SIUW Februar/87 
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a9,00,8d,af,cf,8d,b®,cf, 
8d,b1,cf,8d,b4,cf,8d,bS, 
cf,85,5c0,85,5d,a2,f8,Be, 
b2,cf,88,68,8d,b3,cf,08, 


c209 
c088 
c81® 
c01B 


a9 88 Bd af cf Bd bB cf 
Bd bi cf Bd b4 cf Bd 65 
cf 85 Sc 85 Sd a2 fB Be 
b2 cf 08 68 Bd b3 cf 28 


Listing 3: Beim Hexdump fallen Zeilen- 
nummern, „Data“ und Kommas weg 


208 


30 


40 


El) 


60 


70 
Bo 


92 
1008 


restore :for a-=-49152 to 49629: poke 

a,234:next :print "moment! 

f=-0:read a:y"peek (63)+peek (64)* 

ES6:if a=ß then 288 

read b,c:for da to b:read a$:if 

len (a$)-2 then 38 

e=-asc (a5)-48-(7 and aS>"@"):if a$< 
"92” or a$>"g” or a$>”:” and a$<”a” 

then 98 

a$=-mid$ (a$,2):e=e*1l6+asc (a$)-4B- 
(7 and a$>”@”) 

if a$s<"®” or a$>"f” or a$>?"3” and 

a$t”a” then 98 

£f=f+e:poke d,e:next :if F=c then 20 

print "pruefsummenfehler: soll”c”, 
ist”f:goto 108 

print "eingabefehler: "a$:y=® 

z=-peek (63)+peek (64)*256:a$-str$ 
(y)+str$ (-z):if y=® then a$=str$ 
(zZ) 


8d,02,03,88,23,03,00,a8,1f,b3,e2 


Korrektor für den C64, Disk Version 


print ”"Cdownlfertig.”:print "[down] 

soll das maschinenprogramm auf 
kassette 

input "abgespeichert werden 
C2spaces] j[3left)”;a$:if a$<>”j” 

then 308 


trap 640:bank ®:restore :print 
"moment... 

data 1300,a9,00,8d,00,ff,ad,02,236 
data 03,ae,03,03,c9,67,d8,0c,e0,8b5 
data 13,d0,08,ad,35,14,ae,36,14,d96 
data b®,14,8d,35,14,8e,36,14,a0,a89 
data 27,a9,30,99,37,14,88,10,Ffa,98e 
data a9,67,a2,13,8d,02,23,8e,03,9b8 
data 03,4c,53,fa,d8,20,24,c0,08,3la 
data a0,27,b9,37,14,99,c0,07,88,d27 
data 10,£7,a5,d7,30,17,a9,18,c5,9cc 
data eb,f8,26,c5,e4,d®,02,c6,e4,388 
data c5,85,d0,02,c6,e5,a9,20,8d,aa9 
data 61,03,28,4c0,69,fa,78,a2,13,2f1l 
data Be,15,203,32,38,8e,14,03,58,7f7 
data a2,ff,86,30,20,93,4f,86,3d,dia 
data B4,3e,ad,37,14,c9,a0,F0,10,2d3 
data a2,19,bd,37,14,9d,45,14,a9,315 
data a0,3d4,37,14,ca,10,f2,20,80,ee6 
data 03,aa,f0,cc,90,03,4c,d9,4d, a50 
data 20,a0,50,20,0a,43,84,2d,a0,014 
data 00,84,09,84,0b,84,0c,84,02,567 
data 88,c8,20,c9,03,aa,f0,38,a5,b5a 
data 09,30,8c,e0,20,f®,f1,e®d,3a,3be 
data f®,0c,e2e0,8Ff,F0,28,e0,22,d0,2b9 
data 22,49,80,09,01,85,09,Ba,a6,20e 
data 0a,f0,06,04,69,00,ca,d®d,fa,625 
data 18,65,0b,85,0b,99,02,e6,0c,dib 
data e6,0a,35,03,29,07,85,03,10,bb4 
data c1,46,09,90,17,a0,ff,a2,16,491 
data 20,10,14,c8,a9,bd,99,37,14,965 
data a2,2b,20,10,14,a9,bb,99,37,a6b 
data 14,4c,ea,4d,84,09,b5,00,85,b78 
data 65,b5,01,85,64,22,98,38,20,e22 
data 75,8c,20,44,Be,a4,03,aa,cB,ffb 
data bd,20,01,F0,08,03,80,393,37,087 


1001 


Korrektor au... nA een 


data c1,39,00,04,88,10,F7 


19002 data 49323,49387,9136,4c,31,ea,7B, 


a9,2e,a2,c0,8d,14,03,8e,15,03,58 


1003 data a9,00,8d,e1,c1,280,60,a5,8c,el, 


c1,86,7a,84,7b,ac,ed,c1,f0,13,a08 


1004 data 18,b9,e1,c1,99,f1,c1,a9,a8,99, 


e1,c1,88,d0,f2,8c,28,c1,20,73,00 


1005 data aa,f®,43,88,84, 3a,90,55 
1006 data 434567, 49629,19950,4c,96,a4,4c, 


08,af,20,6b,39,20,79,85,84,0b,a8 


1007 data 00,84,08,84,45,84,45,84,09,cB, 


be,ff,01,f0,38,25,808,30,0c,e0,20 


1008 data fD,f2,e0,3a,f0,0c,e0,8F,f0,28, 


ed,22,d0,02,49,80,09,21,85,28,Ba 


1009 data a6,09,f0,06,02,693,00,ca,dd,Fa, 


18,65,45,85,45,90,02,86,46,e6,29 


1018 data a5,09,29,07,85,09,10,02,46,28, 


1011 


92,21,a0,ff,8c,ed,ci,32,14,20,b9 
data c1,c8,a9,bd,99,e2,c1,a9,be,c8, 
99,e2,c1,c8,a2,45,20,b9,c1,a9,bb 


110 print "CdownJ11”a$"L2up]”;:poke 1012 data S9,e2,c1,4c,a4,34,84,08,b5,00, 
198,1:poke 631,13:end 85,63,b5,81,85,6°,a2,90,38,290,49 

208 print "[downlfertig.”:print ”[Cdown) 1013 data be,20,df,bd,a4,08,a8,c8,bd,00, 
soll das maschinenprogramm 01,£0,08,03,80,39,e2,c1,e8,d0,f2,68 
abgespeichert 1999 rem ein/ausschalter 

218 input "Luplwerden[2spaces] jL3left]” 2008 data 49152,49186,5131,2d,03,03,c9, 
;aß:if a$<>”)” then 388 c0,d0,09,ad,de,ci,as,df ,c1,40,27 

2208 sys 57812”@:49152 korrektor”,B:poke 2oo1 Be TR REEL a BE a Bl 
193,8:poke 194,192:poke 174,222 u a) ‚90,8°,01,08,10,fa 

e rem eingabesicherung 

230 poke_175, 193: uue BEBS7: verify 3000 data 49285,49322 ,4626,ad,el,c1,d®, 
49152 korrektor”,8,1 21,84,29,d0,8d,21,d0,35,da,30,2e 

308 a$=-"":input "[downlkorrektor 3001 data 09,80,85,da,a0,27,29,20,39,28 
aktivieren? j[3left)]";a$:if as-"5" 04,88.10 fa.a6 d6 dd 05 a3 11 22 \ 
then sys 49152 35,eb NET a le ee 

999 rem hauptprogramm s 

1000 data 49187,49208,2342,a9,ae,a2,c®, Sen fnben Birne bee rt ia wenn Bi 


data ‚49293,49295,792 


sys 57812”"49152 korrektor"”,1,1:poke 
193,8:poke 194,192:poke 174,222 
poke 175,193:sys 62957:print "bitte 
die kassette zurueckspulen und 
input "return druecken” ;a$:verify 
"49152 korrektor"”,1i 


T r fü 4: u für 


data 14,e8,d0,f2,69,4c4,37282 
a=--1:for n=® to 345:read a$:on len 
(a$) goto 4790,490,510,530,55® 


print "data-fehler [rvs]"”a$ 

print "zeile ” peek (65)+peek (66)* 

e56:end 

b=dec (a$):poke a,b:p"-p+tb;ara+i 

k=xor (Ck*2 and 49895)+int (k/2048), 

b):goto 578 

if k=-dec (a$) then k=®:goto 578 

print "fehler: parity soll ” mid$ 

€ hex$5 (k),2):goto 480 

if a<® then a-=dec (a$):p-a:goto 578 
print ”pruefsumme fehlt!":end 

if p>val (a$) then print 
’pruefsummenfehler!":end 

a--1 

next :if a>® then 540 

print "fertig.":print "[down]soll 
das maschinenprogramm 
abgespeichert 

print "werden?":get key a$:if as<> 
")”" then 618 

bsave ”4B64korrektor128”,b2, p4B64 
to p5173:print ds$ 

print "[Cdown]Jsoll der korrektor 
gestartet":print "werden? 

trap :get key d$:if a$=-")" then sys 
4864 

end 

if er=14 then resume 4B®d:else if er 
=30 then resume 5660 

print "eingabefehler: "” err$ (er): 
help 

trap :stop 


Korrektor für den C128 


Februar/87 Um 81 


WED DEE NORDELCRER BL ESSRNI BR CAT 


418:restore 


Korrektor zu = u 772 IEWEERE 


print "[clrIJdas programm sollte vor dem ersten 


nen+l:read a$:a=-atdec (a$):if len (a$)=2 then 388 


a-peek (65)+peek (66)*256-len (a$)-1:poke 1269,a 


if er=38 then print "break kann das programm 


if er<>13 then print ”zeilen-eingabefehler!":help 


restore :for a=4897 to 4354:read a$:poke a,dec 


print "das korrektorstarterprogramm kann jetzt 


data b5,20,85,63,b5,01,85,62,a2,308 


118 data 8c,180,c1,27,9e,20,34,31,33,38 348 data 38,29,ce,a2,20,71,a4,24,08,aa 
128 data 900,00,00,ad,e5,27,c9,18,d0,03 358 data c8,bd,808,01,Ff0,08,09,89,39,c0 
138 data ce,e5,27,ad,e8,07,c9,18,d0,83 360 data BF.e8.dd.F2,60.00.00.00 

1498 data ce,eB,07,a9,008,8d4,f1,87,4c,8e 370 

150 data ce,a9,39,8d,02,03,a9,10,84,03 startabgespeichert werden![Ldown] 
168 data 03,a9,11,85,2c,68,a2,18,8e,15 380 

178 data 03,a2,ff,86,3a,290,53,88,86,3b 398 print "data-fehler: 

188 data B4,3c,ad,c®,0f,c9,ad,f9,10,a2 poke 1265,peek (64):poke 1263,1 
190 data 19,bd,c0,0f,Sd,ce,®f,a9,a0,9d 4900 

208 data c®,0f,ca,10,f2,20,73,04,aa,f® and 255:poke 1270,a/256:help :end 
210 data d3,90,03,4c,25,87,29,3e,8e,20 419 

2208 data 53,89,84,0b,a0,00,84,28,84,45 zerstoeren! ":end 

230 data 84,46,84,09,88,08,20,a5,024,aa 428 if er-i14 then resume 399 

240 data f®,38,a5,08,30,0c,e8,20,F8,F1 438 

258 data e0d,3a,Ff0,0c,ed,8f,f0,28,e0,22 :end 

268 data d®,02,49,80,09,01,85,08,Ba,a6 448 if n<>259 or a<>27332 then print 
270 data 09,f0,06,02,69,008,ca,d®,fa,18 ”pruefsummenfehler, bitte pruefen!"”:end 
2808 data 65,45,85,45,90,02,e6,46,e6,09 458 

230 data a5,09,29,07,85,89,10,c1,46,08 (aS):next 

308 data S0,17,a0,ff,a2,14,290,db,12,c8 468 

310 data a9,bd,99,c0,0f ,a2,45,29,db,1® abgespeichert werden. 

328 data a9,bb,99,c0,0F,4c,36,87,84,28 478 poke 45,3:poke 46,17:cir 


Korrektor für den C16/116/Plus/4 


Checker für 
Maschinen- 


Programme 


Der Checker dient zur Eingabe 
von Maschinenprogrammen für 
den C64. Er reduziert die Tippar- 
beit und verhindert Eingabefeh- 
ler. Außerdem entfällt das lang- 
wierige Einlesen von Datazeilen. 
Der Basiclader des Checkers 
steht auf Seite 84. Er poket nach 
dem Start mit RUN die Daten in 
den Speicher. Da er sich dabei 
selbst überschreibt, muß er unbe- 
dingt vorher abgespeichert wer- 
den! Nach dem Einlesen der Da- 
ten schreibt der Lader einen 
SAVE-Befehl auf den Bildschirm, 
so daß man nur Return zu drücken 
braucht, um den fertigen Checker 
abzuspeichern. Dieser kann dann 
mit LOAD “CHECKER",8 geladen 
und mit RUN gestartet werden. 
Willman den Checker mit der Da- 
tasette benutzen, muß man beider 
Diskversion einige Zeilen erset- 
zen. Die nötigen Änderungen ste- 
hen im Listing unten. 


00,20,02,28 f,68,B6, 
Za,0of, 88, 08, Fr do, ad, 
b2,85,fe,38,4c,7d,Ff5,a9, 
£f8,0f,20,d0,F7,20,17,F8,b® 


66 
bi 


33 
e1 
oo 


Ch für den C64: Ände 


82 QUD Februar/87 


MED ZIOME LIEBE LERBNTIRER REIN 


‚66,9d, 
‚bl,b2, 

‚2e8,fd,Bde,sa,ea,208 
‚58,20,af,f5,a5,b7 
f0,07,20,ea,f7,30,09,b0,4a,20,2c,f7,f0,45,b® 
43,a5,90,29,10,d0,3d,85,c3,a9,40,85,c4,29,56a 
2af,b0,32,88,69,07,32,390,02,e6,af,86,1d,8a,29 
38,4a,4a,4a,a8,a5,af,38,e9,40,06,1d,2a,06,1d 
2a,85,1d,a2,08,e4,1d,f0,08,a9,ff,3d4,00,3c,e8 


Der Checker ist eine Art Textedi- 
tor für Maschinenprogramme, die 
in Form von Hexdumps abge- 
druckt sind. Jede einzelne Zeile 
(zu je acht Bytes) wird anhand ei- 
ner miteinzugebenden Prüfsum- 
me auf Richtigkeit getestet. Bei 
Tippfehlern ertönt ein akustisches 
Signal. Die hexadezimalen Daten 
werden mit den Tasten 0—9 und 
A—F eingegeben. Mit RETURN 
übernimmt man eine Zeile in den 
Speicher. Stimmt die vom Compu- 
ter errechnete Prüfsumme mit der 
eingegebenen überein, ertönt ein 
hoher Ton. Bei einer fehlerhaften 
Zeile ist ein tiefer Ton zu hören, 
und der Cursor springt wieder an 
den Zeilenanfang. 

Weitere Funktionen kommen fol- 
genden Tasten zu: 

Y: Muß vor dem Eintippen eines 
Programms als erstes betätigt 
werden! Der Checker fragt dann 
nach der Startadresse, unter der 
das Programm später abgespei- 
chert werden soll. Der benötigte 
Wert ist jeweils den Programmbe- 
schreibungen zu entnehmen. 


4o,Sb,ff,ff 
85, fd, c8,bi 


data 
data 
data 
data 
data 
data 
data 


für Da 


[rvs)”a$:poke 1264, peek (63): 


Cursortasten: Der Cursor wird 
mit den Cursortasten gesteuert. 
Erreicht er den oberen oder unte- 
ren Bildschirmrand, wird entspre- 
chend gescrollt. 

INST/DEL: Löscht ein Zeichen 
oder fügt eines ein. 

HOME: Setzt den Cursor an den 
Zeilenanfang. 

CLR: Löscht eine Zeile und läßt 
sie zur Veränderung frei. 

K: Löscht eine Zeile und zieht den 
Rest nach oben. 

I: Fügt eine Leerzeile ein. 

H: Setzt den Cursor an den Text- 
anfang. 

$S: Speichert das Programm ab. 
Sollte sich im Text eine Leerstelle 
befinden, springt der Cursor dort- 
hin. Saven ist erst möglich, wenn 
alle Leerstellen entfernt wurden. 
L: Lädt ein abgespeichertes Pro- 
gramm, um es zum Beispiel zu er- 
gänzen oder zu verändern. 

P: Druckt das Programm aus. 
Wird der Checker mit Runstop/ 
Restore verlassen, so kann man 
ihn mit SYS 2073 ohne Datenver- 
lust wieder aktivieren. 


d®,f4,b9,75,2d,3d,08,3c,4c,19,88,4c,92,89,30 
c3,ff,4c,92,09,20,de,2d,b0,53,20,fd, de, 20,d® 
£7,20,38,F8,b0,3b,20,8F,Ff6,a5,1b,85,ae,a5,1c 
38,e9,498,85,af,a5,fe,85,c2,a5,fd,85,c1,18,65 
ae,85,ae,a5,af,65,c2,85,af,a9,01,298,5a,F7,b® 
13,a9,80.85.c1.a9.40.85.c2.aS.1c.85.af.aS' 1b 
85,2e,20,67,f8,4c,19,08,20,08,85,1d,30,df,e6 
print "[Cclr,2down]save” chr$ (34)”"checker” chr$ 
(34)”"Chome]”; :end 


M 


th: 


ıt* 


1 


1a) dab dad dad dad dad dr 
u 


wurgW 
DS 0 


6.6470 


DOIHnNZUNFSUBIHNFUNME 


Jurüunne 


® 


S] 


Korrektor 22.:::.53:.:2 32m r aA DEL 


0b,08,c1,07,98,32,30,36,34,00,20,00,00,00,00 
a9,00,85,fd,85,fe,20,f8,0F,20,82,09,a9,3F,8d 
8a,02,a9,18,8d4,05,dc,20,2f,08,20,a3,0a,“4c,26 
08,20,27,02,a9,020,85,c6,85,c6,F0,fc,208,27,0a 
ad,77,02,60,39,00,84,20,d0,a9,0e,8d,21,d0,a® 
00,a2,d8,84,1b,84,1f,86,1c,86,20,a9,04,85,1e 
84,1d,a9,00,91,1b,a9,380,91,1d,c8,d0,f5,86,1c 
e6,l1e,e8,ed,dc,d®d,ec,a2,17,a8,55,89,86,31,1F 
c8,91,1Ff,c8,c8,c0,6c,980,£f3,c8,c8,39,06,31,1£f 
c8,931,1f,a5,1f,18,69,28,85,1f,90,02,86,20,ca 
d®,da,a®,05,a2,30,a9,b0,99,20,04,88,09,80,399 
21,04,c8,c8,c8,e8,eß, 
99,00,04,c8,ca,d®,f6 
1c,a9,17,85,02,85,61 
08,a5,19,18,69,08,85 
69,07,85,1b,98,02,e6 
93,8b6,88,83,35,fd,18, 
66,09,68,20,66,09,20,83,09,a85,19,85,1d,a5,1a 
18,69,40,85,1e,85,1a,85,1f,a5,19,0a,26,1f,da 
25,1f,a9,3c,85,20,85,19,4a,4a,4a,29,07,38,b9 
98,09,a8,00,31,1f,F0,22,88,00,84,0d,b1,1d,20 
66,09,20,83,09,a4,2d,c8,c0,08,d0,ef,28,2a,0b 
20,83,09,20,83,09,20,66,09,4c,65,09,a2,1c,a0 
00,89,80,91,1b,20,83,09,ca,d®,f4,60,48,4a,4a 
Ma,4a,20,74,09,68,29,0Ff,4c,74,09,18,69,F6,30 
02,69,06,69,ba,29,bf,a0,88,91,1b,e6,1b,d8,02 
e6,1c,60,a9,0f,8d,18,d4,20,30,03,20,41,08,“4c 
bd,28,80,40,20,10,08,04,02,01,89,50,a0,04,85 
1d,84,1e,a2,16,a0,27,84,20,a9,4f,85,1f,a4,1F 
bl,1d,a4,20,91,1d,c6,1f,c6,20,10,f2,a5,1d,18 
69,28,85,1d,90,02,e6,l1e,ca,d®,dc,a9,c0,85,1b 
a9,07,85,1c,a5,61,18,69,b0,85,19,35,62,69,08 
85,1a,4c,f5,208,a9,98,a0,07,85,1d,84,1e,a2,17 
a9,27,85,1f,a9,4f,85,20,a4,1f,b1,1d,a4,20,31 
1d,c6,20,c6,1f,10,f2,85,1d,38,e9,28,85,1d,b® 
02,c6,le,ca,d®,dc,a9,580,85,1b,a9,04,85,1c,a5 
61,85,19,85,62,85,1a,4c,F5,08,a4,63,b1,65,49 
05,91,65,60,839,00,85,61,85,62,39,00,85,63,85 
64,a9,55,85,65,39,d8,85,66,60,c6,64,30,0c,5 
65,38,e9,28,85,65,b9,02,c6,66,60,e86,64,a5,61 
38,e9,08,85,61,b9,0b,c6,62,10,07,a9,00,85,61 
85,62,68,4c,e6,09,86,64,85,64,c9,17,f0,0c,a5 


e3,690,8d4,95 


65,18,69,28,85,65,90,02,e6,66,60,06,64,a5,61 
18,69,08,85,61,90,02,e6,62,85,62,c9,3f,d®,0b 
a5,61,c9,08,d2, 


05,a9,00,85,61.60.40,a0.09.c9 
11,d0,03,4c,6e,@a.c9,91.d0.03.4c.45,0a.c9.1d 


d0,03,4c,68,2b,c9,9d,d®,03,4c,3a,2b,c9,0d,d® 
03,4c,17,0c,c9,30,90,0F.c9,3a,3®, 08,c9,41,98 
07,c9,47,b0,03,4c,98,0b6,c9,13,d®, 83,4c ‚sb,®c 
c9,93,d80,03,40,95,0c,c9,14,d0,03, 4c,e6,00,c9 
94,d0,03,4c,bf,0c,c9,48,d0,86,20,30,0a,4c,bd 
08,c9,49,d0,83,4c,11,0d,c9,4b,d8,23,4c,85,8d 
c9,53,d8,03,4c,2d,10,c9,4c,d8,03,4c,79,8F,c9 


59,d8,83,4c,68,10,c9,50,d8,83,4c,b2,18,608,a2 
08,a0,00.18,89.00,71.1d,49,FF.cA,ca.d®.F8.60 
c6,63,a5,63,18,03,e6,63,60,c9,02,F0,F3,c9,05 
fdO,ef,c9,08,f0,eb,c9,0b,f®,e7,c9,de,f®,e3,c3 
11,F9,df,c9,14,f0,db,c9,19,d0,df,a9,16,85,63 
60,86,63,85,63,c9,1c,d0,03,c6,63,60,c9,02,f® 
£f1,c9,05,f0,ed,c9,08,f8,e9,c9,0b,f0,e5,c9,de 
f®,e1,c9,11,F0,dd,c9,14,f0,d9,c9,17,d0,af,a9 
1a,85,63,60,48,20,80,0c,68,29,3F,09,80,84,63 
91,1d,4c,68,2b,a0,00,b1,1b,29,7Ff,c9,30,b0,02 
69,3a,e9,30,4c-,83,09,20,38,0b,0a,0a,03,0a,85 
04,20,38,2b,05,2d,60,35,65,85,1b,35,66,29,03 
09,04,85,1c,20,04,0c,20,e8,0b,b9,98,09,85,67 
49,ff,a0,08,31,1f,91,1Ff,60,a5,1e,38,e9,40,85 
1f,a5,1d,0a,26,1f,0a,26,1f,a9,3c,85,20,85.1d 
Y4a,4a,43,29,07,88,560,a5,64,03,04,0a,18,65,61 
85,1d,a5,62,69,28,69,40,85,1e,60,20,c8,0b,a® 
00,84,02,20,b9,0b,20,83,09,a4,02,91,1d,c8,c® 
08,d0d,ef,20,83,09,28,83,09,20,b9,0b,85,0d4,20 
2a,0b,c5,0d,f®0,06,20,61,0c,85,63,60,85,67,a®8 
00,11,1F,91,1Ff,a9,20, 63,20,6e,da,39,890,20 
6e,0c,a0,14,20,86,0c, B8f,0c,a9,3c,20,6e,2c 
a8,50,28,86,2c,4c,Bf, 8d,01,d4,29,00,84,008 
d4,a9,11,8d4,05,d4,a9,f1,84,06,d4,a9,11,8d,84 
d4,60,a2,00,ca,d®,fd, d®,f8,60,39,00,8d,04 
d4,60,20,c8,2b,20,bd,28,a9,00,85,63,60,a5,65 
85,1d,35,66,29,03,09,04,85,1e,60,00,01,03,04 
06,07,09,08,0c,2d,8Ff,10,12,13,15,16,1a,1b,208 
a8,0c,a®,1b,b1,1d,c9,30,d®,1b,a2,11,bc,ad,®c 
c4,63,f0,0e,84,0d,ca,bc,ad,®c,b1,1d,a4,0d,S1 
1d,d®2,eb,a9,a80,91,1d,60,28,80,2c,85,63,f0, FB 
a2,11,dd,ad,8c,f®,03,ca,10,f8,bc,ad,®c,bi,1d 
ca,bc,ad,8c,91,1d,eB,e8,ed,12,dd,ef,a9,a0,a® 
1b,91,1d,4c,3a,2b,20,04,0c,39,Ff0,85,1f,a9,7Ff 


BBrBHR: 


des Checkers für den C64, Diskversion 


re TE re 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


for z=1 to 162: f$-" 


read 


85,20,a2,07,a9,0F,85,2d,8a,a8,bi,1f,a4,0d,31 
1f,c6,2d,ca,10,f3,a5,28,c5,1e,d0,06,a5,1f,c5 
1d,F0,0d,a5,1f,38,e9,08,85,1F,b9,d8,c6,20,d8 
d4,20,e8,0b,a6,1Ff,b3,75,0d,85,2d,b9,7d,2d,a®8 
00,31,1f,48,08,85,02,b1,1F,25,0d,05,02,31,1F 
eB,f®,08,28,7e2,20,3c,08,4c,65,2d,28,bd,28,28 
60,00,88,c0,e0,fd,F8,fc,fe,ff,7f,3F,1F,0f,07 
03,21,20,04,0c,a0,07,a2,0f,84,0d,8a,a8,bi,1d 
a4,0d,91,1d,ca,c6,0d,10,Ff3,35,1d,18,69,08,85 
1d,980,02,e6,1e,a5,1d,c9,f8,d0,dc,a5,1e,c9,7f 
d®d,d6,20,04,0c,20,e8,0b,a2,ff,18,08,28,3e,20 
3c,08,ca,e4,1f,d®,f6,b9,75,0d,3d,8080,3c,85,02 
bd,08,3c,28,234,39,7d,0d,85,02,9d,00,3c,4c,bd 
08,a2,00,b6d,08,3c,c9,ff,d®,03,28,d0,f6,86,02 
a2,ff,e4,02,f0,3F,bd,20,3c,d0,05,ca,ed,ff,d®o 
f2,a6,02,bd,00,3c,85,02,a0,00,45,02,39,58,09 
F0,03,c8,10,f6,84,0d,a9,00,85,62,8a,0a,26,62 
03,26,62,02,26,62,05,0d4,0a,26,62,03,26,62,0a 
26,62,85,61,20,36,03,38,60,a0,07,bd,00,3c,d9 
75,04,£f0,05,88,10,f8,30,bc,84,02,a93,00,85,1c 
Ba,0a,26,1c,0a,26,1c,0a,26,1c,05,02,0a,26,1c 
03,26,1c,08,26,1c,85,1b,a5,1c,18,65,40,85,1c 
18,68,86,0d,85,1d,84,1e,a5,63,48,a5,64, 48,25 
65,48,85,66,48,30,27,89,a0,39,00,04,88,10,f8 
a8,00,b1,1d,F0,09,20,2a,0F,99,00,04,c8,d0,f3 
a2,00,84,63,89,06,939,00,d8,99,01,d8,c8,e8,e4 
8d,d0,f7,a9,d8,85,66,39,00,85,64,85,65,85,20 
20,2f,08,48,29,60,d0,1a,68,c9,0d,f0,2d,c9,14 
dd,ef,a5,20,f0,eb,c6,63,c6,20,a9,a0,a4,63,39 
00,04,10,de,a4.20.68.39.00.02.c4.@d.Fd.d4.a4 
63,20,28,90Ff,99,900,04,e6,20,e6,63,d0,c6,a4,20 
a3,00,939,00,02,68,85,66,68,85,65,68,85,64,68 
85,63,60,48,a9,20,a0,0f,a2,0Ff,20,66,0e,38,a2 
00,20,02,20,bd,ff,68,a8,a2,08,39,08,20,ba,ff 
28,c0d,ff,a9,01,4c0,40,0F,46,49,4c,45,4e,41,4d 
45,20,00,48,4a,4a,4a,4a,4a,aa,68,29,1F,1d,38 
of ,60,00,a0,80,c0,40,e0,c0,e20,39,08,20,b4,Ff 
a9,6f,20,96,ff,a0,27,a9,a0,99,00,04,29,00,39 
00,d8,88,10,f3,20,00,20,a5,ff,c9,0d,f0,09,20 
2a,0f,99,00,04,c8,d®,f®,ad,20,04,24,01,04,29 
Of ,48,20,ab,ff,68,60,a9,00,20,fd,0e,d0,6e,a2 
08,20,c6,ff,a9,90,85,90,85,1b,20,cf,Ff,85, fd 
2BO,cf,ff,8d,fe,00,20,F8,0f,a9,3c,85, ic,as, 02 
85,02,85,1d,a9,40,85,1e,a5,90,d0,35,a0,00,20 
ef,FFf,91,1d.ch,. cd, 08,d0.F6,a0,00,86.02.,bl.1b 


1d,98,09,91,1b, e6,02,e8.e0,08.d0.06.a9.00.85 
02,e86,1b,a5,1d,18,69,08,85,1d,90,cf ‚e&,ie,a5 
1e,c9,80,d0, c7,20,cc,ff,a a9,08,28,c3,ff,20,38 
da,4c,32, os, 89,00,85,c6,85,c6,f®d,fc,d®d,eb,a® 
00,38,99,00,3c,c8,d®,fa,60,20,cc,ff,a9,28,20 
ca,Ff, 4c,92,09,20,de,2d,b0,53,a5,1b,48,a5,1c 
48,a9,01,20,fd,08,85,1f,68,85,1c,68,85,1b,a5 
1f,d0,c5,a9,080,85,1d,a9,40,85,1e,82,08,20,c9 
FF .aS.fd.20, d2,ff,aS, Fe,20,d2,Ff,a5,1d.c5.1b 


d@,06,aS,1e,cS,1c,F®,94,a0,00,b1.1d.20.de.F£ 
c8,c0,08,d0,f6,85,1d,18,69,08,85,1d,90,df,e6 
le,d®,db,4c,bd,08,a2,04,a0,10,a9,88,20,66,0e 
a9,0f,85,1b,a9,04,85,1c,20,b9,2b,8d, fe, 29,20 
b9,0b,8d,fd,00,4c,92,09,41,4e,46,41,4e,47,53 
41,44,52,45,53,53,45,20,00,18,69,f6,90,02,69 
06,69,3a,4c,d2,Ff,48,4a,4a,4a,4a,20,98,10,68 
29,0f,4c,98,10,20,de,2d,b®,ae,a9,00,20,bd,ff 
a9,04,aa,a0,00,20,ba,ff,20,c0d,ff,a2,24,20,c9 
ff,a0,06,a9,20,20,d2,Ff,88,d0,f8,a2,07,a0,008 
98,20,84,10,39,20,20,d2,Ff,c8,ca,10,f3,a8,05 
b9,6c,11,20,d2,Ff,88,10,f7,a9,8d,20,d2,ff,20 
d2,ff,aS,fd,85,1f,a5,fe,85,20,39,00,85,1d,a9 
40,85,1e,a5,1d,c5,1b,d0,06,85,1e,c5,1c,f®,4e 
a5,20,20,84,10,a5,1f,20,a4,10,39,20,20,d2, ff 
20,d2,ff,a0,00,b1,1d,20,a4,10,49,20,20,d2, ff 
c8,c0,08,d0,f1,a9,20,20,d2,Ff,20,d2,ff,20,2a 
0b,20,a4,10,a9,0d,20,d2,ff,aS,1f,18,69,08,85 
1f,90,02,e6,20,85,1d,18,69,28,85,1d,90,aa,e6 
1le,d®,a6,20,cc,ff,a9,04,4c,c3,ff,4d,55,53,4b 
48,43,0d,04,8d,2d,2d,2d,02d,68,c1,00,00,00,00 
ok":for b=® to 14 

h$:gosub 388:h=-1*16:h$=-mid$ Ch$,2):aosub 398 


poke 20834+z*15+b,h+l 

next :print "zeile”z;f$:next 

poke 45,122:poke 46,17 

print ”C[Ccir,2down]save” chr$ (34)”"checker” chr$ 
(34)” 8Chome]”; :end 


l=asc (h$+”"x”)-48:if 1<8 or 1522 then 338 
if 1<18 then return 

1-1-7:if 1>9 then return 

1=-9:f$=" [Crvsleingabefehler”:return 


3993 
3858 
3888 
4347 
4258 
4453 
4399 
411® 
4903 
4181 
4718 
4452 
4377 
4031 
3996 
4181 
4749 
3847 
3857 
4023 
3836 
4605 
4253 
4569 
4064 
4167 
4433 
4204 
4769 
4178 
4994 
4829 
4189 
4286 
4114 
4369 
3787 
Sı164 
4725 
3714 
3753 
3951 
4487 
4266 
4079 
4168 
4363 
3883 
4216 
4361 
4426 
4678 
49025 
4263 
4028 
4004 
3781 
4411 
42393 
4622 
4479 
4373 
3663 
3591 
4406 
4961 
4394 
4472 
4037 
49013 
4420 
4333 
3638 
4158 
3793 
2293 
39041 
1738 
1716 
1639 
3398 


3067 
1044 
1334 
2647 
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Floppy-BDisk 
selbst repariert 


Vor ungefähr acht Monaten fing 
meine 1541-Floppy an, verrückt zu 
spielen. Beim Laden von Program- 
men blinkte die rote Kontrolleuch- 
te unregelmäßig, der Schreib/Le- 
sekopf fuhr häufig grundlos zum 
Anschlag (akustisch bemerkbar 
durch lautes metallisches Knat- 
tern wie zu Beginn eines Forma- 
tiervorganges) oder sprang ner- 
vös zwischen zwei benachbarten 
Spuren hin und her (schnelles 
Blinken der roten LED, begleitet 
von leisem Rattern) und brach 
nach einiger Zeit den Ladevor- 
gang ab. Die Fehlermeldung, die 
sich bei einer Äbfrage ergab, war 
meist „read error" oder „illegal 
track or sector". Alles in allem ein 
unhaltbarer Zustand. Da ich den 
Gang zum Händler zwecks Repa- 
ratur aus finanziellen sowie zeit- 
lichen Gründen aufjeden Fall ver- 
meiden wollte, machte ich mich 
selbst auf die Suche nach dem 
Fehler und konnte ihn schließlich 
auch beheben. Da ähnliche Fälle 
inzwischen bei mehreren Bekann- 
ten vorgekommen und von mir re- 
pariert wurden, gebe ich meine 


Erfahrungen an alle RUN-Leser 


weiter: Wenn eins oder mehrere 
der oben genannten Symptome 
sich bei einem Floppy-Disk-Lauf- 
werk einstellen, dann ist wahr- 
scheinlich der Schreib/Lesekopf 
dejustiert. Nach folgender Anlei- 
tung wird er neu eingestellt: 

l. Schalten Sie die Floppy aus 
und entfernen Sie das Netzka- 
bel sowie die Verbindungska- 
bel zu den anderen Geräten. 

2. Lösen Sie die vier Schrauben 
an der Unterseite des Gehäu- 
ses, und nehmen Sie den Dek- 
kel des Gerätes ab. Stellen Sie 
das Gerät nun so vor sich, daß 
die Frontseite sichtbar ist. 

3. Das Gerät ist auf der Gehäu- 
seunterseite mit sechs Schrau- 
ben fixiert (Bild 1; Kennbuch- 
stabe A). Lösen Sie die 
Schrauben und heben sie das 
Gerät aus dem Gehäuseunter- 
teil, nachdem sie Stecker P4 
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Einige „Defekte“ an 


Commodore Laufwer- 


ken sind einfach und 


ohne Hilfe zu beheben. 
RUN-Leser Jens Dülken 
berichtet von Erfahrun- 
gen, Tips und Tricks. 


(Verbindung zur grünen LED) 
von der Platine gelöst haben. 


. Rechts hinten auf der Platine 


befindet sich Stecker Pl 
(Stromversorgung der Platine). 
Ziehen Sie diesen ab. 


. Lösen Sie die 7 Schrauben, 


von denen die Platine gehal- 
ten wird (Bild 1; Kennbuchsta- 
be B). Jetzt können Sie die Pla- 
tine kopfüber links neben das 
Gerät legen. 


. Nun muß das Laufwerk aus 


dem Metallgerüst gelöst wer- 
den (Bild 1; Schraubensatz C). 
Nehmen sie das Laufwerk 
heraus (erst leicht anheben, 
dann nach vorne ziehen) und 
stellen sie es um 90° gekippt 
vor sich. 


. Auf der Unterseite des Lauf- 


werks befindet sich der 
Schrittmotor. Die beiden Befe- 
stigungsschrauben (Bild 2; 
Kennbuchstabe D) sind ex- 
trem fest angezogen. Drehen 
Sie diese los, um sie dann wie- 
der leichter zu fixieren. 


. Legen Sie die Platine an ihren 


Platz zurück und drehen sie 2 
bis 3 Schrauben des Satzes B 
wieder ein. Stecken Sie die 
Stromversorgung Pl auf. 
Überzeugen Sie sich, daß bei 
der Anordnung der Gerätetei- 
le keine Kurzschlüsse möglich 
sind. Netzkabel sowie Verbin- 
dungskabel zum Computer 
wieder anschließen und die 
Geräte einschalten. 


. Legen sie die TEST/DEMO 


oder eine andere einwandfrei 
formatierte Diskette ein. 


ll. Prüfen Sie, ob der Fehler im- 
mer noch auftritt. Das kann ge- 
schehen, indem Sie ein Pro- 
gramm laden und dabei die 
rote LED beobachten. Diese 
darf während des Ladevor- 
gangs nicht mehr ausgehen, 
Ist das dennoch der Fall, dann 
schalten Sie die Floppy aus, 
lösen wieder den Schrittmo- 
tor, drehen ihn etwas (die 
Schrauben lassen dazu genug 
Spielraum) und fixieren ihn 
wieder. Den Vorgang 11 so- 
lange wiederholen, bis sich 
ein zufriedenstellendes Er- 
gebnis zeigt (das sollte späte- 
stens nach 3 bis 5 Versuchen 
der Fall sein). 

12. Testprogramm eingeben und 
starten. Läuft es problemlos, 
setzen Sie nach Entfernen der 
Kabel die Floppy wieder zu- 
sammen. Das geschieht in ge- 
nau umgekehrter Reihenfolge 
wie das Zerlegen. 

Fertig. 


Wiehtige Hinweise! 


— Mit Öffnen lackversiegelter 
Schrauben erlischt der Garantie- 
anspruch an Commodore, der 6 
Monate vom Kauf des Gerätes an 
gilt. 

— Lesen Sie daher die Anleitung, 
bevor Sie anfangen, gründlich 
durch und befolgen Sie die einzel- 
nen Schritte genau, um Schäden 
am Gerät zu vermeiden! 

— Besondere Vorsicht ist gebo- 
ten, während das Gerät im geöff- 
neten Zustand unter Strom steht. 
Jens Dülker umummurEcE 


ea ee 


en 
RE BTER 


ON Er NG VE 


Erläuterung: 


Das Testprogramm überprüft mit 
zwei 'BLOCK-READ'-Befehlen die 
Lesbarkeit der Blöcke '1 0' sowie 
'35 0' stellvertretend für die erste 
und letzte Spur der Diskette. 

Die rote LED an der Floppy darf 
nach dem Starten des Programms 
nur einmal für einige Sekunden 
aufleuchten. Danach meldet sich 
der Rechner mit '0 OK', Trifft das 
nicht zu, sondern wird eine Feh- 
lermeldung ausgegeben, dann ist 
die Floppy noch nicht gut einge- 
stellt. 


Bild 2: Laufwerk von unten, oben links 
der Schrittmotor 


Bild 1: Floppy von oben, Gehäuseoberteil abgenommen 


Die nächsterreichbaren Ausgaben von RUN sind: 


4187: Annahmeschluß am 11. 2. 87 
5187: Annahmeschluß am 11. 3. 87 


Um Ihre Anzeige in der gewünschten 
RUN-Ausgabe zu plazieren, 
benötigen wir Ihre Druckunterlagen 
pünktlich zum Annahmeschluß. 


VEIT TOMENNE BAER YET 
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Zeichendarstellung 
wandeln per Umschalter 


Zu den Attraktionen des C128 ge- 
hört, von 40 auf 80 Zeichen pro Zei- 
le umschalten zu können. Die ge- 
eigneten Farbmonitore haben zu 
diesem Zweck einen Schalter. Ent- 
scheidet man sich für einen mono- 
chromen Monitor (grün oder bern- 
stein), dann muß man entweder 
auf eine der beiden Möglichkei- 
ten verzichten oder bei jedem 
Wechsel der Zeichenzahl auf der 
Rückseite des Monitors einen 
Cinch-Stecker herausziehen und 
einen anderen hineinstecken, was 
umständlich ist und auf Dauer zu 
starkem Verschleiß führt. ... 
oder man bastelt sich den hier be- 
schriebenen Umschalter 


Anschlüsse für den 


Monitor 
ERETERUTTDER SUN TT 


1. TV-Buchse: Hier kann ein Fern- 
sehgerät angeschlossen wer- 
den. 


2. RGB-Buchse: An diesem Aus- 
gang können die Signale für 80 
Zeichen/Zeille abgenommen 
werden. Hochauflösende Gra- 
fik ist im 80-Zeichen-Modus 
ohne Zusatzprogramm nicht 
möglich. 


3. Video-(Composite-)Buchse: 
Ausgang für 40 Zeichen/Zeile 
und hochauflösende Grafik 
(320 Punkte pro Zeile). Hier 
wird der vom 64er „übrigge- 
bliebene" Farbmonitor ange- 
schlossen. 


Werden für 40- und 80-Zeichen- 
Darstellungen zwei Monitore ver- 
wendet oder ein entsprechend 
ausgerüsteter Farbmonitor (zum 
Beispiel der Commodore 1901) 
eingesetzt, dann brauchen Sie 
nicht weiterzulesen. 

Wenn Sie einen monochromen 
Monitor für beide Darstellungsar- 
ten anschließen wollen, dann wird 
es interessant: Es wird in die RGB- 
Buchse ein passendes Kabel ge- 


BON Fekmuie 


Mit dem C128 ist glück 
lich, wer entweder ei- 
nen Monitor besitzt, 
der auf Knopfdruck 


zwischen 40 und 80 
Zeichen wechselt oder 
sich unseren preisgün- 

stigen Umschalter 

baut. 


Abb. 2: So sieht 


Abb. 2: Vorbereiten des abgeschirm- 
ten Kabels zum Anlöten des Steckers 
(Abisolieren und Verdrillen der Ab- 
schirmung) 


je fertige Schaltung aus 


steckt, das am anderen Ende ei- 
nen Cinch-Stecker trägt. Ein ent- 
sprechendes Kabel kommt in die 
Video-Buchse. Hat der Grünmoni- 
tor einen Tonteil, dann muß das 
zweite Kabel in zwei Cinch-Stek- 
ker auslaufen, von denen der Au- 
dio-Stecker auch dann einge- 
steckt sein muß, wenn nur der 80- 
Zeichen-Modus gewünscht wird: 


‘ Über den RGB-Ausgang kommt 


kein Tonsignal! Die Stecker für die 
Bildsignale müssen gewechselt 
werden (je nach gewählter Art 

1 Cinch-Buchse 

2 Antennen-Buchse 

3 Schalter 

4 Drahtbrücke 

5 Kabelabschir- 

mung am Gehäuse 


angelötet 


6 Abgeschirmtes 
Kabel zum Monitor 


der Darstellung). Da die Cinch- 
Buchse des Monitors bei fast allen 
Geräten auf der Rückseite liegt, 
ist das Umstöpseln ein mühseliges 
Unterfangen. Doch es geht auch 
anders: 


Teilebedarf 
PTR 


Die Verbindungskabel zwischen 
Computer und Monitor sind abge- 
schirmt (für Einsteiger: Der Innen- 
leiter ist von einem mit Masse ver- 
bundenen Außenleiter umgeben), 
um von außen kommende Störsi- 
gnale fernzuhalten. Wenn diese 
Abschirmung sinnvoll sein soll, 
dann darf sie nicht unterbrochen 
werden. Also verbietet sich die 
Verwendung eines einfachen 
Schalters, wie für Beleuchtungs- 


zwecke verwendet. Äbgeschirm- 
te Schalter sind schwer zu bekom- 
men, es sei denn, man greift auf 
die Antennenumschalter zurück, 
die in jedem Computershop ver- 
kauft werden, um den wahlweisen 
Anschluß von Antenne und Com- 
puter am Fernseher zu ermögli- 
chen. Erleichtern Sie sich die Ar- 
beit, und wählen Sie ein einfaches 
Modell mit geschlossenem Blech- 
gehäuse. (Elegante Kunststoffver- 
kleidungen erschweren den Bau 
zumindest beträchtlich.) 

Die Anschlußstecker und -buch- 
sen des Umschalters passen nicht 
zu den Cinch-Anschlüssen des 
Monitors und seiner Kabel. Daher 
benötigt man zwei Cinch-Buchsen 
(am besten die Ausführung für 
Zentralbefestigung zum Fest- 
schrauben mit einer Mutter) und 
einen Cinch-Stecker. Überdies 
benötigt man die beiden genann- 
ten Monitor-Anschlußkabel. 
Öffnen Sie das Gehäuse des Um- 
schalters und löten sie die Verbin- 
dungen zwischen dem eigentli- 
chen Schalter und den Mittelan- 
schlüssen der beiden Antennen- 


buchsen ab! Die Antennenbuch- 
sen können im Gehäuse verblei- 
ben. Dann bohren Sie zwei pas- 
sende Löcher für die Cinch-Buch- 
sen. Achten Sie bei der Wahl des 
Platzes für diese Löcher darauf, 
daß innen auch tatsächlich genug 
Platz zum Einbau der Buchsen be- 
steht! Bohren Sie vorsichtig, damit 
der eindringende Bohrer nicht 
den Schalter beschädigt! Nach 
dem Festschrauben der Cinch- 
Buchsen verlöten Sie über eine 
kurze Drahtbrücke die Innenan- 
schlüsse der Buchsen mit den 
Kontakten des Schalters, von de- 
nen Sie vorher die Antennenbuch- 
sen abgetrennt haben. Jetzt muß 
der Antennenstecker abgeschnit- 
ten, das Kabelende abisoliert (sie- 
he Abbildung 1 und 2) und an den 
Cinch-Stecker angelötet werden. 

Prüfen Sie mit Hilfe eines Ohmme- 
ters oder Durchgangsprüfers, ob 
der Außenring des Steckers mit 
dem Blechgehäuse des Schalters 
und den Außenteilen der Buchsen 
gut leitend verbunden ist! Ein 
Strom zwischen dem Innenkontakt 
des Steckers oder der Buchsen 
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und dem Gehäuse darf auf keinen 
Fall fließen! (Sollte das Ohmmeter 
bei diesem Test ausschlagen, 
dann suchen Sie nach unsauberen 
Lötstellen, herabgetropftem Löt- 
zinn oder verbogenen Drähten!) 
Wenn bis hierher alles stimmt und 
das Ohmmeter zeigt, daß je nach 
Schalterstellung der Stift des Stek- 
kers mal mit dem einen, mal mit 
dem anderen Innenkontakt der 
Buchsen verbunden ist, dann ist 
der Umschalter betriebsfertig. 
Bauartbedingt ist das Signal im 
128er-Modus (vor allem bei 80- 
Zeichen-Darstellung) deutlich 
stärker als im 64er-Modus. Vom 
Einbau eines Abschwächers wur- 
de wegen der kleinen Gehäuse- 
abmessungen abgesehen; die 
Helligkeit läßt sich bequem auf 
der Monitorvorderseite einstel- 
len. Wenn sich bei den ersten 
Tests beim Umschalten von 80 
Zeichen in den 64er-Modus auf 
dem Bildschirm scheinbar nichts 
tut, dann nicht gleich verzweifeln 
sondern zum Helligkeitsregler 
greifen! 

D. Berger EEE 


Was nicht 


im Handbuch steht... 


Die Programmierer des Basic 
V7.0 waren nachlässig. Diese Be- 
hauptung wird sofort anhand ei- 
nes Beispiels bewiesen: 

10 DEF FNA(X)=SIN(X) 

20 GRAPHIC 1,1 

30 CIRCLEI, 160, 100, 80 

40 GRAPHIC 0,1 

50 X=3.14:PRINT FNA(X) 

60 FORI=1TO 10 

70 PRINT I:NEXT 

Dieses Programm stürzt in Zeile 50 
mit einer Fehlermeldung ab. Die 
Kontrolle ergibt keinen Fehler in 
der Programmierung. Läßt man es 
nochmals laufen, funktioniert es 
einwandfrei! 

Des Rätsels Lösung: Wenn in ei- 
nem Programm erstmalig die 
GRAPHIC-Anweisung erscheint, 
wird der Basic-Anfang nach oben 


4 Tips, die zeigen, 
welche ungenannten 
Fähigkeiten und Fehler 


das Commodore 128- 
Betriebssystem in sich 
birgt. 


verschoben. Dadurch müssen der 
Basic-Text und alle Pointer mitver- 
schoben werden. Bei C16/Plus 4 
Computern erfolgt dies korrekt. 
Beim C128 müssen die Zeiger auf 
die Variablen jedoch nicht geän- 
dert werden, da sich diese in ei- 
ner anderen Bank befinden. Der 
Pointer, der auf diese definierte 
Funktion zeigt, wurde vergessen! 


VUBIRU RE TRIER BRETT? 


Wird eine Funktion definiert und 
danach auf Grafik umgeschaltet, 
so arbeitet DEF FN fehlerhaft. Da- 
her: In einem Programm, in des- 
sen Verlauf die GRAPHIC-Anwei- 
sung verwendet wird, muß die 
erste Zeile GRAPHIC 1,1:GRA- 
PHIC 0,1 lauten. So gibt es bei 
DEF FN keinen Absturz mehr. 


LOCATE und DRAW 
SEE NRETRERET 


Mit LOCATE positioniert man den 
Grafik-Cursor an jede Stelle des 
Hires-Bildschirmes. DRAW zeich- 
net Punkte. Interessanterweise 
kann man diese Befehle relativ 
adressieren. 
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Wirkung 

Grafik-Cursor von seiner ak- 
tuellen Position um 20 Pixel 
nach rechts und um 50 Pixel 
nach unten bewegen. 
Grafik-Cursor von seiner ak- 
tuellen Position um 30 Pixel 
in einem Winkel von 90 Grad 
bewegen. 

Von der aktuellen Position 
des Grafik- Cursors in einer 
Entfernung von 40 Pixel nach 
rechts und 60 Pixel nach 
links einen Punkt zeichnen. 


Format 
LOCATE +20,+50 


LOCATE 30,90 


DRAW 1,+40, +60 


Negative Werte führten zu Fehlermeldungen. 


Der Basic-Befehl BOOT ist, laut 
Handbuch, auf zwei Arten an- 
wendbar: BOOT ohne Filename 
ruft die Boot-Call-Routine des Be- 
triebssystems auf. Der C128 boo- 
tet wie beim Einschalten. Die An- 
weisung funktioniert einwandfrei 
mit den Floppies 1541, 1570 und 
1571. 

Folgt dem BOOT-Befehl ein File- 
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B.M.S.-System inkl, Rapid-DOS inkl. Einbau 
B.M.S.-System inkl. Rapid-DOS ohne Einbau 
B.M.S.-System ohne Rapid-DOS inkl. Einbau 
B.M.S.-System ohne Rapid-DOS ohne Einbau 
Erweiterung auf 512 kByte inkl. Einbau 
Erweiterung auf 512 kByte ohne Einbau 


Wir liefern die guten Spiele 


Natürlich alle Neuerscheinungen aus England und USA. Aber auch alle Klassiker * 


CTJ Computer-Technik Karl Junges 
D-5600 Wuppertal-23 
Telefon: (0202) 61 20 11+61 21 11 


B.M.S.-System 


320 kByte RAM für C64 

B.M.S. (Bank Memory Select) ist ein RAM-Erweierung (320 kByte), die es ermöglicht, fünf 

verschiedene Programme in den Rechner zu laden und zu starten. Die Auswahl der 
Programme erfolgt per Tastatur. (Das ganze System ist Software gesteuert.) 
IN Ausführlicher Testbericht in der RUN Ausgabe 12/86. Ill 


Versand nur gegen Vorauskasse oder Nachnahme. 


name, so lädt der C128 ein Ma- 
schinenprogramm (wie mit 
BLOAD) in den Speicher und star- 
tet es automatisch an seiner Lade- 
adresse. Diese Version des 
BOOT-Befehls funktioniert nur mit 
1570- und 157l-Laufwerken. Die 
Programmierer des Betriebssy- 
stems haben vergessen, die Lade- 
adresse in der langsamen (von 


DM 495,- 
DM 445,- 
DM 445,- 
DM 395,- 
DM 245,- 


ERREGT RELETERELTTE LET TEE Tips und Tricks sm a 7727200 TE 


der 1541 verwendeten) LOAD- 
Routine des Kernal einzusetzen. 


ASCII/DIN- 
Umschaltung per 


Programm 
EEETEEITLEETETN 


Das Handbuch beschreibt, wie 
man per Programm von ASCII auf 
DIN umschaltet. Die beschriebe- 
ne Befehlssequenz ist allerdings 
unvollständig und funktioniert 
nicht. Der Fehler wird folgender- 
maßen behoben: 

ASCI auf DIN: 

POKE 0, PEEK(0)JOR 64: 

POKE 1, PEEK(1) AND 191. 

Von DIN auf ASCII: 

POKE 0, PEEK(O)JAND 191 oder 
POKE 0,47. 

Das Betriebssystem setzt das Re- 
gister in Adresse automatisch zu- 
rück. 

Welcher Zeichensatz gerade aktiv 
ist, testet man mit PEEK(215)AND 
128. Ergebnis = 128 bedeutet DIN 
aktiv. 


I Vo nnd 


Anzeigen- 
schluß 
für die RUN- 


Ausgabe 4/87 


11.2. 1987 


der großen Marken 


Für den Commodore C64, für den AMIGA, für ATARI 800XL, für ATARI-ST. für PC-XT oder -AT 


*Und 


88 GUD rem 


- wo immer das möglich ist — mit deutscher Anleitung in der Original-Verpackung! 
Unsere Preise halten Ihrem Vergleich stand — 
bitte fordern Sie unsere kostenlosen Listen 

für Ihren Gerätetyp an. Es lohnt sich bestimmt! 


FUNTASTIC MailOrder. 
D-8000 München 2 - Müllerstraße 44-R. - 089-2609593. 


Praxis Listing 


Basie außer 


System: C64 
Typ: Utility 
Sprache: ASM 


Ohne Klimmzüge lassen sich mit 
„Randhexer“ beliebige Zeichen- 
ketten in den normalerweise un- 
benutzbaren Bildschirmrand prin- 
ten. Hierfür stehen leistungsfähige 
Befehle bereit. SYS 49152 startet 
„Randhexer". 

Die Syntax der Befehle ist: 
@b,p,P,p 

Das heißt, jeder Befehl beginnt mit 
dem Zeichen '@', gefolgt von ei- 
nem Buchstaben, der den Unter- 
befehl definiert. Dahinter kom- 
men ein bis drei Parameter, durch 
Komma voneinander getrennt. Er- 
laubt sind direkte Werte und alle 
Ausdrücke, die vom Basic aufge- 
löst werden. 

Nicht alle Befehle benötigen drei 
Parameter. Auf keinen Fall dürfen 
mehr als drei Werte definiert wer- 
den, sonst folgt SYNTAX-ERROR. 


Auflösung: 27x40 


Zeichen 
IRETTRERBEN TEE 


Ein Hinweis: Soll ein @-Befehl hin- 
ter THEN erscheinen, muß ihm ein 
Doppelpunkt vorangehen, sonst 
gibt es ebenfalls SYNTAX-ER- 
ROR. Nun zum Befehl, der den 
Rand an- und abschaltet. Er lautet: 
@R,pl,p2 
Der erste Parameter kann folgen- 
de Werte annehmen: 

0 = Rand ausschalten 

1 = Rand wieder einschalten 
255 = zurück zum Normalmodus 
Dieser Befehl mit den Parametern 
null oder eins ist beliebig oft ver- 
wendbar. Bei Werten von 2 bis 
254 wird immer ] angenommen. 
Bei 255 wird die Befehlserweite- 
rung abgeschaltet. SYS 49152 re- 
aktiviert. Der zweite Parameter 
steuert das Aussehen des Randes. 
Werte von 0 bis 255 sind erlaubt. 
Bei null ist der Rand einfarbig, bei 
255 völlig schwarz. Andere Werte 


BRNO EL ONE IV RERRENN: 


„Randhexer“ nutzt den 
Rand des C64-Bild- 
schirms. Seine Zusatz- 


befehle sind in Basic 
eingebunden. 


ergeben schwarze Striche, die 
dem Bitmuster des Parameters 
entsprechen. Fehlt der zweite 
Parameter, wird null angenom- 
men. Seine Verwendung ist nur 
sinnvoll bei abgeschaltetem Rand 
(erster Parameter = 0). Bei einge- 
schaltetem Rand können sämtli- 
che anderen Befehle benutzt wer- 
den, jedoch ist auf dem Bildschirm 
nichts zu erkennen. Erst wenn der 
Rand abgeschaltet ist, wirken sich 
diese Befehle aus. Es ist somit 
möglich, Texte, Sprites und so 
weiter vorzubereiten, deren Wir- 
kung man erstnach @R,0 erkennt. 
Statt der Pokes 53280/81 wird 
@F ‚pl,p2 benutzt. 
Der erste Parameter übergibt die 
Farbe von 0 bis 15. Danach folgt, 
durch Komma getrennt, ein Wert 
von 1 bis 127. Andere Werte sind 
möglich, ergeben aber keinen 
Sinn. Die Werte des zweiten Para- 
meters geben an, was einzufärben 
ist: 

1 = Bildhintergrund 

2 = obere beiden Ecken 

4 = oberer Rand 

8 = untere beiden Ecken 

16 = unterer Rand 
32 = beide Seitenränder 
64 = obere und untere Sprites 
Durch Addieren der Werte wer- 
den mehrere oder alle Felder 
gleichzeitig gefärbt. Bei Werten 
über 127 wird einfach 128 abgezo- 
gen, so daß 129 den Wert 1 ergibt. 
Ebenso wird beim ersten Parame- 
ter jeder Wert mit 15 'geORt', so 
daß immer gültige Farbwerte ent- 
stehen (logisches OR). Im Farbge- 
bungsbefehl wurde bereits die 
Farbe für Sprites erwähnt. Es be- 
steht die Möglichkeit, an Stelle 
der verschwundenen Ränder 


Sprites erscheinen zu lassen, je 
nach Wunsch am oberen oder un- 
teren Rand oder an beiden. Es 
werden je sieben Sprites benutzt, 
deren Bild- und Blockadresse 
ebenso wie ihre Ausdehnung in x- 
und y-Richtung mit jeweils doppel- 
ter Breite und Höhe feststehen. In- 
halt, Priorität vor Hintergrund, 
Farbe sowie Sichtbarkeit sind frei 
wählbar. Dazu dienen die näch- 
sten Befehle. 


Befehlsliste 
RETTEN 


Für das Ein- oder Ausschalten der 
Sprites ist der Befehl @S,pl,p2 zu- 
ständig. Ist der erste Parameter 
null, so sind die Sprites ausge- 
schaltet, bei eins sind sie einge- 
schaltet. Der zweite Parameter 
sagt, welche Sprites gemeint sind: 
0 = alle Sprites 

= Sprites am oberen Rand 
2 = Sprites am unteren Rand 
Zusätzlich wird bestimmt, ob diese 
Sprites vor oder hinter dem Rand 
stehen. Dazu dient: @P,p. 
Bei p=eins stehen die Sprites da- 
hinter, bei null davor. Neben der 
Standardmethode, Sprites über 
Datas zu laden, stehen einige hilf- 
reiche Befehle zur Verfügung. Um 
Sprites vorzubereiten oder er- 
schienene zu verändern gibt es 
den Befehl: @V,pl,p2. 
Der zweite Parameter hat die glei- 
che Wirkung wie der beim Befehl 
@S. Der erste Parameter enthält 
einen Wert von 0 bis 255. Er füllt 
die im zweiten Parameter ange- 
sprochenen Sprites. Bei allen Zwi- 
schenwerten erscheinen Sprites 
mit senkrechten Strichen. 
Dies ist eine etwas grobe Metho- 
de, das Aussehen der Sprites zu 
verändern. Es ist jedoch möglich, 
Punkte einzeln zu verändern. Da 
Sprites in 21 Reihen zu je drei 
Bytes organisiert sind, stehen ins- 
gesamt 42 Reihen zur Verfügung. 
Am oberen Rand die Reihen 1 bis 
21, unten 22 bis 42. So werden sie 


auch im Befehl gezählt. Der Befehl » 
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lautet: @E,pl,p2,p3. Die Bedeu- 
tung des ersten Parameters ist: 

0 = löschen Einzelpunkt 

l = setzen Einzelpunkt 

2 = invertieren Einzelpunkt 
Parameter 2 enthält einen Wert 
zischen 1 und 160, die Spalte, in 
der sich der zu ändernde Punkt 
befindet. Parameter 3 enthält den 
Wert von 1 bis 21 für den oberen 
und von 22 bis 42 für den unteren 
Rand. Die Befehle @A,pl,p2 und 
@B,pl,p2 transportieren ASCII- 
Code bei @A und Bildschirmcode 
bei @B. Im ersten Parameter steht 
der Code, ein Wert von O bis 511. 
Das Programm holt die Zeichen 
aus dem Zeichengenerator des 
C64. Darin befinden sich zwei Zei- 
chensätze mit normalen und re- 
versen Zeichen. Zahlen bis 127 
entsprechen normalen Zeichen 
aus dem ersten Satz,128 bis 255 
dem entsprechenden Reverszei- 
chen. Grafik und Kleinschriften 
erscheinen gemischt im Rand. 


Befehlsübersicht 
PAREc Se REN 


@A,pl,p2 ASCII-Code für 

Sprites 

Bildschirm-Code 

Sprites 

pl = Code von Obis 
5ıl 

p2 = Stelle im Rand 
von 1 bis 80 


@B,pl,p2 für 


@E,pl,p2,p3Einzelpunkt in Spri- 


tes verändern 

pl = 0 Punkt löschen 
1 Punkt setzen 
2 Punkt inver- 
tieren 


p2 = Spalte 1 bis 160 
p3 = Reihe 1 bis 42 


@F pl,p2 Farbe verändern 
pl = Farbe O bis 15 
p2 = | Bildhinter- 
grund 
2 obere Ecken 
4 oberer Rand 
8 untere Ecken 
16 unterer Rand 
32 Seitenränder 
64 Sprites am 
oberen und un- 
teren Rand 
@P,p Priorität der Rand- 
sprites 
@R,pl,p2 Ein- und ausschalten 
des Randes 
pl = ORand aus 
l Rand ein 
255 Rand ein 
und Befehlser- 
weiterung aus 
p2 = 0 bis 255 Muster 
des Randes 
@S,pl,p2 Sprites ein- und aus- 
schalten 
pl = Oaus 
lein 
p2 = Ooben und 
unten 


4c,e8,c3,4c,5c,c1,ad,19, 
d®d,84,19,d0,30,0a,ad,®d, 
dc,58,4c,31,8a,4c,44,c1, 
a0,0f,b9,00,d0,c9,d2,b®, 
£f4,88,F0,03,88,d0,£f3,a0, 
02,b69,00,d0,99,08,3c,b9, 
ef,3c,99,20,d0,c8,c0,11, 
dd,ef,ad,15,b9,00,d0,39, 
00,3c,c8,c0,19,d0,f5,a0®, 
1b,b9,00,d0,99,00,3c,c8, 
c0,20,d0,f5,a0,25,b9,00, 
d®,99,08,3c,89,03,99,00, 
d®d,cB,cd,2f,d0,f0,a2,Fff, 
80,07,b9,£f8,07,99,£0,07, 
83,99,f8,07,ca,88,d0,f2, 
ad,fe,8c,15,d0,8c,17,d2, 
8c,1d,d®,a2,13,8e,11,d2, 
ae,12,d0,ed,fa,30,f9,a2, 
85,ca,dd,fd,dd,ea,a2,00, 
Be,20,d0,32,04,8e,21,d2, 
ae,12,d0,d8d,fb,a2,1b,Be, 
11,d®,ae,12,d0,e0,2B,3®, 
f9,a2,f1,a0,f9,8a,99,00, 
07,e8,c8,d0,f8,a®d,fe,Bc, 
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loben 
2 unten 
@V ,pl,p2 Vorbereiten und Ver- 
ändern Sprites 
pl = ASCII-Code 
p2 = O0 oben und 
unten 
loben 
2 unten 
„Randhexer" ist als kombinierter 
Hexdump-Basiclader abgedruckt. 


Schnell eingetippt 


En nn aa 

Wie man mit dieser Art Listing um- 
geht, steht auf Seite 82. Sämtliche 
Funktionen wurden in Maschinen- 
sprache programmiert. Dadurch 
werden die Zusatzbefehle beson- 
ders schnell ausgeführt. Das Pro- 
gramm selbst ist nur 5 Disketten- 
blöcke lang. Wird es als Hex- 
dump eingegeben, muß, der 
Checker verwendet werdey. Als 
Startadresse ist C000 einzugeben. 
Wird „Randhexer“ als Basic-La- 
der eingegeben, so muß der La- 
der vor dem Start abgespeichert 
werden. Nach RUN werden die 
Daten in den Speicher gepoket. 
Das fertige Maschinenprogramm 
wird mit 

POKE 43, 0: POKE 44,192 

POKE 45,217: POKE 46,196 
SAVE,„randhexer",8 
abgespeichert. 

G. Kramer EEE 


15,d0,8c,17,d0,8c,1d,d®, 
a9,08,30,0f,99,20,d0,88, 
88,c0,01,d2,f7,a2,00,8e, 
20,d0,a2,04,8e,21,d®,ae, 
12,d0,d®,fb,ae,12,d0,e®, 
32,90,f9,a2,08,ca,dd,fd, 
a2,f5,8e,20,d0,a2,06,Be, 
21,d0,a0,02,b9,00,3c,99, 
00,d0,c8,c0,11,d0,f5,a®, 
15,b9,00,3c,99,20,d0,b9, 
dc,07,99,e4,07,b9,df,07, 
99,e7,07,c8,c0,19,d8,e9, 
a8,1b,b9,00,3c,99,00,d®, 
c8,c0,20,d0,f5,a0,25,b9, 
00,3c,99,00,d0,c8,c®,?f, 
da,f5,a9,81,8d,1a,d®,a9, 
e7,8d,12,d8,4c,bc,fe,a?, 
00,20,79,00,f0,04,20,fd, 
ae,20,Ba,ad,20,bB,bi1,aı, 
64,36,65,60,20,73,00,c9, 
490,Ff0,03,4c,287,37,20,73, 
00,85,fb,20,73,00,20,47, 
c1,84,02,86,fc,20,47,c1, 
86,fd,20,47,c1,86,fe,a5, 


fb, 09, 41,98,.09685,fc,09,. 58 c3b8 120908 data fc,a0,80,c9,03,38,86,38, 35 
c188 5008 data fFf,d8,04,a9,5e,d8,18,c9, 68 c3c® 1218 data e9,03,c8,d0,f6,65,fd,85, e5 
c19® 510 data a0d,90,06,29,7f,09,40,d®d, d3 c3c8 12208 data Fd,38,a0,00,84,fc,a0,06, 26 
c198 528 data Bde,c9,60,90,04,29,df,d®d, 88 c3d® 1238 data Ba,26,fc,88,d0,fa,18,65, ei 
c1a® 530 data 06,09,40,90,02,29,3F,85, Bi c3d8 1248 data fd,85,fd,a5,fc,65,fe,85, de 
claß 548 data fc,4c,b3,c1,c9,42,f0,03, 14 c3e® 1258 data fe,68,85,Ffb,68,85,fc,60, Sf 
c1b® 558 data 4c,36,02,a5,02,a2,03,06, 31 c3e8 12608 data ac,88,02,a9,ff,a2,3c,c@, 56 
c1b8 568 data fc,2a,ca,d®d,fa,18,69,d0d, 45 c3f® 1278 data 40,90,12,a2,7c,c0,80,90, cd 
c1c® 578 data a6,fc,85,fc,86,fb,a5,fe, 66 c3f8 1288 data 0c,a2,80,a9,3f,c0,c0,90, fd 
c1cB 582 data 85,02,85,fd,a2,00,c9,01, 94 c40® 12908 data 04,a9,3f,a2,cc,8d,67,c®, df 
c1d® 530 data 30,04,c9,51,30,02,89,01, 79 c4808 1308 data 29,F1,8d,b2,c0,98,803,03, “42 
c1d8 608 data c9,15,30,06,38,e9,14,e8, 59 c41® 13108 data 8d,60,c0,8d,6f,00,84,73, 1d 
cleßd 618 data d2,f6,86,fe,85,fd,a2,03, Ba c41B 1328 data c2,84,b8,c0,8d,11,c1,8d, da 
cleB 628 data B6,fe,ca,dd,fb,a5,fe,c9, Bd c428 1338 data 14,c1,8d,17,c1,8d,1a,ci1, 56 
c1Ff® 638 data 10,30,03,18,69,21,18,69, e2 c428 13408 data Ba,Bd,c5,c4,8d,ca,cH4,8d, FB 
c1f8 640 data 06,85,fe,a2,03,06,fd,ca, ®d c43® 1358 data d7,c4,8d,2e,c®,8d4,31,c0, 16 
c208 658 data d@,fb,a5,fb,48,a5,fc,48B, d6 c438 1368 data 8d,41,c2,8d,48e,c0,8d,5b, 3F 
c288 668 data a5,02,85,fc,20,5f,c3,68, “48 c44® 1378 data cd,Bd,fe,c2,8d,0b,c1,8d, 26 
c218 670 data B5,fc,68,85,fb,78,a2.33. 5e c448 1388 data 24,c1,8d,31,01,8d4,25,c3, 55 
c218 680 data 86,01,20,00,b1,fb,a2,37, 45 c45® 1398 data 8d,62,03,09,de,8d,b2,c2, 53 
c220 630 data 86,01,58,391,fd,e6,fb,e6, 77 c45B 1400 data B8d,32,03,8d,68,03,8d,27, Sc 
c228 7008 data fd,e6,fd,e6,fd,a9,07,24, 65 ce460 1412 data c3,a38,09,0f,84,18,c3,8d, bd 
c23® 718 data £fb,d0,82,4e;56,63,09,45, dd c4H6B 1429 data 3c,c3,809,30,8d,c2,c2,Ba, 58 
c238 720 data d0,26,20,5F,03:88,43,ce, Be c47® 1438 data 18,69,02,8d,34,c03,78B,a9, 65 
c2408 738 data 4c,50,03,a5,fb,a0,00,a6, c3 c478 1449 data 06,8d4,14,803,89,c0,8d,15, eb 
c24B 740 data fo,d®,07,49,ff,31,fd,4c, 68 c48® 145® data 03,8d,09,03,39,03,8d,08, a7 
c258 758 data 5d,c2,e0,201,d0,05,11,fd, 58 c4H88 14560 data 03,ad,11,d0,29,7f,8d,11, bf 
c258 768 data 4c,5d,c2,51,fd,91,fd,60, 68 c4930 1478 data d®,a9,81,8d,1a,d0,ad,21, fi 
c260 778 data c9,46,d0,3e,a6,fc,a9,01, 66 c498 1488 data d®,8d,f6,c0,ad,20,d0,8d, 4B 
c268 788 data 24,fd,Ff0,03,8e,f6,c0,8a, 62 cHad 1430 data 97,c0,8d,9c,c0,8d,d6,c00, 11 
c27® 790 data 24,Ffd,f0,03,Be,d6,c0,02a, B2 c4aB 1508 data 8d,db,c0,8d,f1,c0,8d,5d, 46 
c278 808 data 24,Ffd,f0,03,8e,db,c®,®a, 7d c4b® 1518 data c2,a2,07,88,02d,c0,a3,e7, a7 
c288 6810 data 24,fd,f®,03,88,97,c0,0a, ci c4b8 1520 data 8d,12,d0,58,39,38,a0,0f, £3 
c288 820 data 24,Fd,f9,03,8e,9c,c0,08a, bc c4c® 1530 data aa,a9,fa,99,2f,3c0,8a,88, 57 
c2390 830 data 24,Ffd,f0,03,8e,f1,c0,0da, 67 c4cB 1548 data 99,2f,3c,38,e93,30,88,c0, ee 
c298 840 data 24,Ffd,f0,03,8e,5d,c®,“4c, b8B c4d® 15508 data 21,d0,ed,a9,c0,8d,3f,3c, ac 
c2ad 858 data 5c,c3,c9,50,d0,2de,a9,00, 7c c4Hd8 1568 data 60,00,00,00,002,200,00,00, 68 
c2aB 8608 data a6,fc,f0,02,a9,ff,8d,1b, b4 

c2b® 878 data 3e,4c,5c,0c3,c9,52,d80,3b, 97 

c2b8 888 data aS,fc,d®,09,a5,fd,8d,ff, a6 60008 For a-43152 to 58392 step 4140 
c2c8 890 data 3Ff,a9,03,d0,06,c9,ff,fo, 1d 8:5=-8:c=®:for b=® to 7: 


c2c8B 908 data 07,39,07,8d,2d,c0,d0,20, d7? gosub 60049 

c2d® 918 data 78,39,31,8d,14,03,39,ea, 43 60018 s=-s+h+l-c:c=s>255:s=-255-s 5034 
c2d8 9208 data 8d,15,03,39,37,84,09,03, f£3 and 255:poke atb,h+l:next 

c2ed 930 data a9,e4,8d,08,03,a9,79,8d, S® b:gosub 69840 

c2eB 948 data 19,d0,a9,F8,8d4,1a,d8,58, ed 60028 F$="pruefsumme ok”:if s<> 5693 
c2f® S58 data 4c,5c,c3,c9,53,d0,1b,aS, e® h+l then F$="[rvs)]) 

c2fB 960 data 00,a6,fc,f®,02,a9,fe,a6, 18 pruefsummenfehler”:f=fF+1 

c308 978 data fd,e8,22,b90,07,8d,be,c®, eB 60038 gosub 680898:next a:print ” 2267 
c388 988 data a6,fd,d0,03,84,798,c®8,“4c, Fd Cdown]”f”fehler”:end 

c31® 990 data 5c0,c3,c9,56,d0,46,ae, ff, # 69040 read h$:gosub 60059:h=1* 2715 
c318 1008 data 3f,8e,39,c3,a4,fd,84,02, 51 £ 16:h$=mid$ Ch$,2) 

c328 1018 data c8,02,b0,07,a2,3c,a0,3e, 2d 60058 l-asc Ch$+”x”)-4B:if 1<8 3198 
c328 10208 data 29,40,c3,a4,02,c0,01,f®d, 53 or 1>22 then 60088 

c338 1038 data 07,a2,3e,a0,40,20,40,c3, al 60068 if 1<18 then return 1944 
c338 104® data a2,81,8e,ff,3Ff,4c,5c,c3, 3c 60078 1=-1-7:if 1>9 then return 1334 
c340 10850 data 80,58,03,B6,fe,a0,40,84, Ba 60088 F$="[rvsleingabefehler”:1=- 2458 
c348 10608 data fd,a®d,00,a5,fc,391,fd,e6, 39 O:£-f+1 

c358 1078 data fd,dd,fa,e6,fe,a6,fe,e®d, b6 6008528 print ”"zeile” peek (64)* 2726 
c358 18808 data 48,d0,f2,68,4c,ae,a7,a5, a2 e56+peek (63)f$:return 


c36®0 1098 data fe,a2,3c,c9,16,90,05,a2, b3 
c368 1108 data 38,38,e9,15,86,fe,c9,81, 29 
c3780 1110 data S0,04,c9,16,90,02,a9,01, 73 
c378 1128 data 38,e9,21,84,80,c3,03,63, 23 
c388 1130 data 10,a6,fd,809,40,85,Fd,Ba, 8b 
c388 1148 data c9,21,90,24,c9,a1,90,02, 88 
c3980 11508 data a9,21,38,e9,01,a8,a5,fc, fa 
c398 1168 data 48,a9,80,85,fb,84,fc,a®, ed 
c3a® 117® data 03,a9,80,46,fb,66,fc,30, 94 
c3a8 1188 data da,4a,c®,02,f0,04,b0,03, 15 
c3b® 1198 data “4a,4a,4a,88,d0,ed,48,a5, 49 


Mit Basic-Befehlen den C64-Bildschirmrand nutzen: RAND-HEXER 
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Wer hat Angst 
vorm sequentiellen File ? 


System: C64/Laufwerk 
Typ: Anwendung 
Sprache: BASIC 


Das Programm stellt vielseitige 
Möglichkeiten zur Verfügung. Ein- 
gaben über die Tastatur werden 
direkt in ein sequentielles File ge- 
schrieben, eine Maske am Bild- 
schirm wird aus dem Video-RAM 
ausgelesen und als sequentielles 
Maskenfile gespeichert, Program- 
me, die zur Bearbeitung durch ein 
Textverarbeitungsprogramm in 
sequentielle Files umgewandelt 
wurden liest der File-Manipulator 
in den Basic-Speicher ein und 
wandelt es in ein lauffähiges 
BASIC-Programm um. 


PRG in SEQ 
ETETENREN 


(Ein BASIC-Programm wird durch 

Eingabe der Befehlssequenz : 

OPEN1,8,1 „name,S,W,: CMDI: 

LIST: CLOSE] «RETURN: in ein se- 

quentielles File mit dem Titel „na- 

men" (geschrieben.) Die Vorteile 

eines guten Textprogramms, zum 

Beispiel der Replace-Befehl, mit 

dem Wörter/Befehle ausge- 

tauscht werden, eröffnen sich 

dem Benutzer. Voraussetzung ist, 

daß das Textprogramm sequen- 

tielle Files einlesen kann! 

Nach dem Start erscheint am Bild- 

schirm ein sieben Punkte umfas- 

sendes Menü: 

1.) Seq. Files lesen 

2.) Seq. Files schreiben 

3.) Bildschirm in File speichern 

4.) Umkehrfunktion von 3. 

5.) Seq. File in Programm umwan- 
deln 

6.) Seq. File kopieren 

7.) Directory 

Punkt 1 liest ein sequentielles File 

Zeichen für Zeichen ein und gibt 

diese direkt auf dem Bildschirm 

aus. Steuerzeichen wie zum Bei- 

spiel Cursor hoch oder Farbe 

‘ weiß führt der Computer sofort 

aus. Um die Daten auf einen Druk- 
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Der „sequentielle File 
Manipulator“ dient der 
komfortablen 
Bearbeitung 


von sequentiellen 
File-Daten. Er hilft, 
die Scheu vor einem 
scheinbar komplizier- 
ten Thema abzubauen. 


ker auszugeben, müssen sie fol- 
gende Zeilen eingeben: 

63025 OPEN 1,4 CMD 1 63070 
CLOSE 2: CLOSE 1. 

Die Datenausgabe wird mit der 
Leer-Taste gestoppt und mit der 
Commodore-Taste völlig abge- 
brochen. 

Unter Punkt 2 wird der Anwender 
nach dem Namen des sequentiel- 
len Files gefragt, das er schreiben 
will. Nach Eingabe des Namens 
wird jeder weitere Tastendruck, 
mit Ausnahme der Links-Pfeil-Ta- 
ste, die die Eingabe beendet, in 
die Datei geschrieben. 


Alle Eingaben werden 
angenommen und 


ausgeführt 
EEE EEE ET EB 


Buchstaben und Grafikzeichen 
werden ebenso gespeichert wie 
Cursorsteuerungen, Bildschirm 
Löschen oder Zeichenfarbe än- 
dern. Dieser Menüpunkt wird 
auch als Minitextverarbeitung ge- 
nutzt ! Punkt 3 gibt dem Anwender 
die Möglichkeit, eine Bildschirm- 
maske zu erstellen, die, am Ende 
der Eingabe, als sequentielles 
File gespeichert wird. An den An- 
fang einer neuen Eingabezeile ge- 
langen Sie durch die Cursorsteue- 
rung oder durch SHIFT/RETURN. 
Drücken Sie die RETURN-Taste 
ohne SHIFT, wird die Eingabe be- 


endet und die Maske auf Diskette 
gespeichert. Interessant ist die Art 
und Weise, in der die Bildschirm- 
daten vom Programm eingelesen 
werden: Durch die Anweisung 
OPEN 3,3 wird der Bildschirm als 
Eingabekanal geöffnet, die einzel- 
nen Daten durch GET #3 eingele- 
sen. Jede am Bildschirm sichtbare 
Zeile wird in einen String gefaßt, 
wobei in Programmzeile 63260 
des File-Manipulators unnötige 
Leerzeichen des Strings (b$) ge- 
löscht werden. Das spart Spei- 
cherplatz und erhöht die Ge- 
schwindigkeit, mit der die Daten 
eingelesen oder abgespeichert 
werden. Weniger Datenfluß = 
weniger Zeitverbrauch. 


Wie beim Maskenball 
Io un > 0 20 nee Fi a 


Punkt 4 liest die unter Punkt 3 er- 
stellten Masken in den Computer 
ein. Versuche, sequentielle Files, 
die nicht unter Punkt 3 gespei- 
chert wurden, unter Punkt 4 einzu- 
lesen, können zum Absturz des 
Programms führen, da das Unter- 
programm 4 von dem, unter Punkt 
3 benutzten, Aufzeichnungsformat 
ausgeht! 

Punkt 5 wird benötigt, um ehemali- 
ge BASIC-Programme, die zur Be- 
arbeitung durch Textprogramme 
in seq. Files umgewandelt wur- 
den, wieder in ein, für den Com- 
modore 64 verständliches Format 
zu bringen. Schwierigkeiten gibt 
es bei Programmzeilen mit einer 
Länge von über 80 Zeichen, da 
diese den Commodore 64 überfor- 
dern und zu einem Error führen. 
Überlange Zeilen müssen noch im 
Textprogramm gekürzt werden. 
(Aus einer Zeile zwei machen 
oder die BASIC Befehle abkürzen. 
Beispiel: Aus „PRINT“ wird „?“.) 
Die Übernahme der Programm- 
zeilen in den BASIC-Speicher un- 
terbricht die Commodore-Taste. 
Hauptmenüpunkt 6 stellt hilfreiche 
Kopierroutinen zur Verfügung. Se- 


quentielle Files werden komplett 
eingelesen, der Inhalt am Bild- 
schirm angezeigt und komplett als 
neues File abgelegt. Auch hierbei 
werden alle Daten zur Kontrolle 
nochmals am Bildschirm ausgege- 
ben. 

Bei der Arbeit mit vielen Files 


kommt der Anwender geradezu 
zwangsläufig in Verwechslungs- 
probleme. Welche Programme 
sind auf der Diskette und welche 
nicht ?!? Punkt 7 schafft hier Abhil- 
fe. Er zeigt das Inhaltsverzeichnis 
der Diskette an, ohne den BASIC- 
Speicher zu benutzen. 
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Um die Vorteile des sequentiellen 
File-Manipulators wirklich effektiv 
zu nutzen, können die einzelnen 
Unterroutinen des Programms, 
zum Beispiel 4 zum Einlesen der 
erstellten Masken, in eigene Pro- 
gramme übernommen werden. 

R. Schmid-Fabian 


500608 
50065 


50078 
50988 
50038 
50188 


62999 
563008 
63001 
63010 
63020 
63930 
63040 
630508 


630608 


63078 
63088 
63033 
631908 
63101 
63118 
63120 
63130 
63142 
63158 
63168 


631798 
631898 
63199 
63200 
63201 
63210 


632208 
63239 
63240 


63258 
632608 


632898 
63290 
63299 
633908 


rem sagq-fFile-manipulator 

rem wettbewerbsbeitr 

rem rudolf schmid-Fabian 

rem 6908 heidelberg 

rem c-54+vc1541 

poke 53288,4:poke 53281,11:cd$=chr$ 
(17):print chr$ (147) chr$ (14) chr$ 
(144) "C4spaces]Menue”cd$ 

print cd$"C4spaces]seq-filse lesen 
Cllspaces]1” 

print cd$”[4spaces]seq-file schreiben 
[7spaces]2” 

print cd$”[4spaces]Bildschirm -> seq- 
file[3spaces]3” 

print cd$"[4spaces]saeq-file -> 
Bildschirm[3spaces)]4” 

print cd$"[4spaces]seq-File -> 
Programm[5Sspaces]5” 

print cd$”[C4spaces]Jseq-file kopieren 
[Bspaces]6” 

print cd$”[4spaces]Directory[16spaces] 


wait 198,1:get a$:a-val (a$) 

if a<1 or a>7 then 50008 

print chr$ (147) 

on a goto 63000,63100,63200,63300, 
63400, 653600, 63802 


rem Hresunununununne 


rem seq. file lesen 

rem m... ......... 

input "programmname”;p$ 

open 2,8,2,p$+",s,r” 

get #2,a$:if a$="" then 63030 

if st=64 then 63078 

wait 145,16:print a$;:rem stop mit lee 
rtaste 

if pesk (653)<>2 then goto 63030:rem c 
--taste 

close 2 

poks 198,0:wait 198,1:goto 58888 

rem Heeennnnnnnnnnnnnene 


rem seg. file schreiben 

rem m... nm... |... 

input ”programmname”;pS 

open 2,8,2,p$+"”,s,w” 

poke 207,8:poke 204,0:poke 205,2 
get a$:if a$="" then 63149 

if a$=-chr$ (13) then print "”"; 
if aßS=-chr$ (95) then 63188:rem pfeil 1 
inks 

print a$; :print#2,a$; :goto 63130 
close 2:goto 50088 


rem m... nn... 


rem bildschirm in seq-fFile 

rem .m.m... nn... -.... 

input ”"programmname”;pS:print chr$ 
(147);:poke 659,128 

open 2,8,2,p$+",s,w”:sys 65487:rem war 
tet auf return 

open 3,3:rem bildschirm als singabekan 
al 

print chr$ (19);:for z=® to 25:b$="": 
k-498 

for s=-1 to k:get #3,8$:b5-b$+a$: next s 
if mid$ (b$,k,1)=" ” then k=k-1:b$- 
left$ Cb$,k):if k?® then 63260 
print#2,b$:next z:close 3 

close ?:goto 59000 


rem “a... nnn.nnnn.n.n.n.... 
rem seq-file in bildschirm 


63639 
63648 
63650 
63655 
63669 
63679 


63689 
636390 


63709 
637198 
63720 
63730 
63797 
63798 
63799 
63880 


63819 


638208 


63830 


638498 
63850 
63862 


rem ....n nn... .n..n.n..n.. 

input "programmname”;p$ 

open 2,8,2,p$+”,s,r” 

print chr$ (147);:for z=1 to 25 
input#2,b$S:if len CbS)<4® and z<25 
then b$=bS+chr$ (13) 

print b$;:next :close 2 

poke 198,8:wait 198,1:goto 599808 


rem m... .......n.... 


rem seq-file in prg. umwand. 

rem m... nn nn.n.n..nnnn..n....n.n.. 

poke 55,1:poke 556,88:clr :rem basicend 
e 

input "programmname”;p$ 

open 2,8,2,p$+",s,r”:print chr$ (14) 
For i-205808 to 40000 

get #2,a$:if a$=""” then 63458 

print a$;:poke i,asc (a$) 

if st-64 then 63488 

if peak (653)<>2 then next :c=taste 
close 2:poke i+t1,13:poke i+2,69:poke 
i+3,206:poke i+4,13:i-20500:rem end 
rem ***programm wird dazukopiert®* 
print chr$ '(147) 

a=-peek (i):a$-chr$ (a):print a$; 

if a<>13 then 63568 

print "i="i+1":goto63510” 

poke 631,19:poke 632,13:poke 633,13: 
pokse 634,13:poke 198,4:sys 42112 

if psek (653)<>2 then i=-i+l:goto 63520 
close 2:end 

rem m „m..n..n.annnsnannnnnn 


rem seq-file kopieren 
rem .m.—-—.—.—..n—....n...... 


poke 55,1:poke 56,48:clr :rem basicend 


s 

print chr$ (147):input "programmname 
alt”;p$ 

open 2,8,2,p$+",s,r”:print chr$ (1%) 
For i-10508 to 400008 

get #2,a$:if a$="" then 63659 

print a$;:poke i,asc (a$) 

if st-64 then 63689 

if peak (653)<>2 then next :rem c=tast 


e 

close 2:hlt=-i 

print chr$ (147):input "programmname 
neu"”;p$ 

open 2,8,2,p$+"”,s,w” 

For i-10508 to hlt 

es=chr$ ( peek (i)):print a$;:print#2, 
a8; 

next :close 2:goto 509888 

rem -m.....n... 


rem directory 

rem m... ..... 

open 1,8,15:poke 768,185: print#1:close 
1:poke 768,139 

if st=--128 then print "Floppy 
einschalten! ”":poke 198,8:wait 198,1: 
goto 59000 

open 1,8,0,”$50":get #1,a$,b$:n$=chr$ 
(8) 

get #1,k$,k$,a$,b$:on -(st>®) goto 

63860:print asc (a$+tn$)+256*asc (b$+ 
ns); 

get #1,a$:if aS>n$ then print as; :goto 

63849 

if psek (5653)<>2 then print :goto 

63830:rem aus mit commodore-taste 
close 1:poke 198,8:wait 198,1:goto 

590009 list 63829 


Die einzelnen Unterprogramme sind leicht in andere Programme integrierbar 


TEE A ER ee, 
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System: C64 
Typ: Utility 
Sprache Assembler 


SYS 39500 startet das Programm 
mit der Betriebssystemmeldung: 
PROG-HELP von Gerd Hoehn 
CBM BASIC v2 37451 BYTES 
FREE 

PROG-HELP schützt sich automa- 
tisch gegen die Gefahr, von Basic- 
Programmen gelöscht zu werden. 
Es schiebt das Ende des Basic- 
Speichers vor sich. Ein RESET 
schaltet es ab. Die Einschaltfar- 
ben des Programmes werden mit: 


Rahmen: POKE 40670,X 
Hintergrund: POKE 40675,X 
Zeichen: POKE 40688,X 


verändert, wobei X eine Zahl im 
Bereich von 0 bis 15 sein muß. 
Speichert man PROG-HELP nach 
diesen Änderungen erneut ab 
(Adresse $9A4C-$9FFF), meldet 
es sich nach jedem Start mit den 
umdefinierten Farben. Nach dem 
Start prüft das Programm jede Ba- 
sic-Zeile sofort nach der Eingabe 
auf Fehler. 

Dabei werden keine SOTO- oder 
GOSUB-Befehle auf Vorhanden- 
sein der Ansprungzeile geprüft, 
da diese eventuell erst später ein- 


Der Kampf gegen 
Programmfehler ist 
nicht aussichtslos. 


PROG-HELP 
führt zum Erfolg! 


gegeben wird. BeiFOR...NEXT- 
Schleifen (NEXT WITHOUT FOR- 
ERROR) verhält es sich ebenso. 
Wird ein Fehler gefunden, meldet 
sich das Programm mit Angabe 
der Fehlerursache in der ober- 
sten Bildschirmzeile und zeigt un- 
terhalb die gerade eingetippte, 
fehlerhafte Zeile an. Bei Fehlern 
während eines Programmablau- 
fes zeigt PROG-HELP die Stelle 
der Zeile an, die für den C64 un- 
verständlich ist. 
Programmbeschreibung: 
$9A4C—$Y9A6B — Vektoren für Ba- 
sic-Warmstart und Eingabe-War- 
teschleife 

$9A6C—$9ACI — Neue Eingabe- 
warteschleife 1 

$9ACC—$Y9AEB — Neue Eingabe- 
warteschleife 2 

$9AEE—$9D79 — Error-Check 


20,da,9e,20,56,93,20,61, 
93,60,39,6c,a2,9a,8d,22, @ 
03,82,03,03,60,39,98,a2, 
Sd,8d,00,03,88,01,03,690, 


a9,00,8d,F6,9Ff,20,60,a5, 
86,73,84,7b,38,20,0a,e5, 
ca,Be,fS,3f,a8,20,a9,20, 
39,08,24,c8,c0,28,d0,F8, 
20,73,00,aa,F0,df,a2,ff, 


86,32,98,06,20,79,85,4c, 
el,a7,a0,cc,8c,02,03,a0, 
9a,8c,03,03,a80,01,8c,F6, 
Sf,20,6b,a9,20,79,a5,84, 


0b,20,13,36,08,18,a5,5fF, 
69,23,8d,f2,9F,a5,60,69, 
00,8d4,F3,9Ff,28,4c,a7,a4, 
20,56,Sa,ae,f2,9Ff,86,7a, 
ac,f3,9f,84,7b,20,73,00, 
Bd,f4,9Ff,c9,3a,F0,f6,c9, 
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leicht gemacht 


$9D7C—-$9DAD — Basic-Warm- 
start 1 

$9DBO—$9E1D — Basic Warmstart 2 
$9E20—$9E73 — Basic Code Klar- 
text 

$9E76—$9ED7 — Fehler ausgeben 
$9EDA—$9F06 — Einschaltmel- 
dung 

$9F07—$9FFF — Interne Zwecke 
Eintippen und speichern: PROG- 
HELP ist als kombinierter Hex- 
dump-Basic-Lader abgedruckt. 


LOAD, RUN: Error ade 
BET EEE TE! 


Wird das Programm als Basic-La- 
der eingegeben, so muß der La- 
der vor dem Start abgespeichert 
werden. Nach RUN werden dann 
die Daten in den Speicher gepo- 
ket. 

Das fertige Maschinenprogramm 
wird mit: 

POKE 43,76: POKE 44,154 

POKE 45,84: POKE 46,159 

SAVE „name",8 

auf Diskette abgespeichert. Für 
den Hexdump muß der Checker 
benutzt werden (Seite 84). Als Start- 
adresse ist 9A4C einzugeben. 

G. Hoehn 


00,£0,13,89,80,390,03,4c, 
Fd,9a,20,79,00,20,a5,a9, 
20,79,00,4c,12,9b,6c,02, 
03,22,00,20,79,00,dd,22, 
Sb,F0,08,e8,e0,06,Fß,1c, 
4cC,802,96,28,73,00,c9,3a, 
f0,09,c39,00,f0,e0,a2,0b, 
4c,76,9e,4c,d9,93,80,8c, 
8e,90,9c,a2,c9,8Ff,F®,ce, 
c9,81,d0,32,a9,80,85,10, 
20,73,00,20,35,89,20,8d, 
ad,22,79,80,c9,34,f0,03, 
4c,1a,9b,20,73,00,20,9e, 
ad,20,8d,ad,20,79,00,c9, 
a9,d0,06,20,73,00,20,Ba, 
ad,c6,7a,4c,8F,9b,c9,82, 
d8,1c,20,73,20,c9,3a,f®, 
b2,c3,00,f0,89,a9,80,85, 
10,20,8b,b0,20,8d,ad,c9, 
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Sb7c 3908 2c,f0,e7,4c,7b,9c,c9,9b, e4 | Sdc4 1128 data 9Sf,a9,00,8d,f4,9F,a9,01, 66 
SbE4 140® data d®,23,20,73,00,30,06,F0, ei | Sdcc 1138 data Bd,f3,9Ff,18,a2,01,20,00, 61 
SbBc H1® data 04,c8,ab,d0,89,20,6b,a8, 43 | Sdd4 1142 data 20,0a,05,a9,20,a2,9e,8d, el 
Sb34 H2O data 20,79,00,F0,0a,c9,ab,d®, dS | Sddc 1150 data 06,03,8e8,07,03,20,c9,a6, Bf 
9b9c 430 data 09,20,73,00,20,6b,a9,'c, 6e Sde4 11608 data a9,1a,a2,a7,8d4,06,03,8e, 85 
9baH 449 data 12,9b,4c0,1a,9b,c9,8d,d®, 38 Sdec 1178 data 07,03,20,00,b69,51,04,c8, 47 
Sbac HS5® data 03,40,b4,9b6,09,89,d0,08, dB | Sdf4 1188 data c9,20,d0,F8,98,6d,F4,3f, 98 
Sbb4 460 data 20,73,00,90,e7,4c,1a,9b, 38 Sdfc 1198 data Bd,Ff4,9Ff,ce,f4,9f,ce,f4t, 99 
Sbbc 478 data c9,8a,d0,0b,20,73,00,30, 21 | 9ed4 1290 data 9f,b9,51,04,03,80,93,51, 94 
IbcH 480 data db,20,79,280,4c,12,9b,c9, 3e 9edc 1218 data 04,c8,cc,f4,9Ff,d2,F2,20, b6 
Sbcc H89® data 86,d0,09,20,73,00,20,81, bi Sei4 1220 data 61,9a,1B,ae,f1,9f,4c,76, 5a 
Sbd4 5090 data b9,4c,12,96,c9,8b,dBd,1f, ca | Seic 1230 data Se,4c,74,a4,18,3e,c9,Ff, be 
Sbdc Sıa data 20,73,20,20,9e,ad,20,79, 26 ge2t4t 1240 data fFO,3a,24,0f,30,36,48,ad, sf 
bet 528 data 00,c9,89,F0,05,a9,a7,20, b5 | 9e2c 1250 data £2,9F,cc,£3,9f,f0,03,ee, Fl 
Sbec 530 data Ff,ae,20,73,00,b0,03,4c, 08 | 3e34 12608 data £3,9F,68,38,e9,7f,aa,84, 13 
Sbf4 540 data aQ,9b,c6,7a,4c,d9,9a,c9, 385 | Se3c 1278 data 49,a0,ff,ca,f®,08,c8,b9, d“4 
Sbfc 550 data 91,d®,1e,20,73,00,20,9e, b4 | 9e44 1280 data 9e,a8,18,fa,30,F5,c8,ad, 6b 
ScO4 560 data b7,c9,89,F0,07,c9,8d,Fo, 63 | 3e4c 1230 data f2,39F,cd,f3,9f,f®,03,ee, F2 
Scdc 570 data 93,4c,1a,9b,20,73,00,20, c5 | 9e54 1308 data £f4,9F,b9,9e,a0,30,18,20, d& 
Sc14 580 data 56b,a9,c9,2c,F0,f6,4c,12, 33 | 9eSc 1310 data d2,Fff,dd,ea,4B,ad,f2,Sf, a7 
Scle 590 data 3b,c9,83,d0,15,20,73,00, ee | 3e64 1320 data cd,f3,9f,F0,06,ee,f3,39f, E6 
Sc24 600 data c9,3a,F0,0b,c9,00,F0,07, 23 | Se6c 1330 data ee,Fi4,Sf,68,4c,f3,a6,4c, ei 
Sc2c 610 data c9,3b,F9,dd,4c,21,9c,4c, 1b | 9e74 1340 data ef,a6,Ba,da,aa,bd,26,a3, 39 
9c34 620 data d9,38,c9,97,d0,09,20,73, e4 | 9e7c 1350 data 85,22,bd,27,83,85,23,20, 19 
Sc3c 630 data 00,20,eb,b7,4c,12,9b,c9, 29 | Je84 1360 data cc,ff,a9,00,85,13,18,a2, Sd 
Sc44 640 data 92,d0,13,20,73,00,20,eb, 5d | 9e8c 13708 data 00,20,01,20,03,e5,30,08, 07 
Schc 650 data b7,a2,00,20,79,00,f0,03, 5a | 9e34 1388 data b1,22,48,29,7f,20,47,ab, a8 
Sc54 660 data 22,f1,b7,4c,12,3b,c9,9d, 3e | 3e9c 1390 data cB,68,18,f4,20,7a,a6,a9, 28 
Sc5c 578 data d0,09,20,73,00,20,9e,b7, 3b | 3ealt 1498 data 69,80,83,20,1e,ab,a4,3a, 23 
Sc64 6588 data 4c,12,96,c9,9e,d0,15,20, d@ | 3eac 1410 data cB,Fd,02b,20,c2,bd,aB,22, Ge 
Sc6Ec 6908 data 73,20,20,8a,ad,20,£7,b7, dS 3eb4 14208 data 8d,f5,9Ff,20,30,Ff,a9,bf, 92 
9c74 700 data 20,79,00,c9,2c,F0,f®,c6, 45 | 3ebce 1430 data 8d,20,04,a0,01,b9,00,04, 36 
Sc7c 71® data 7a,4c,0f,3b,c9,87,d0,10, a4 | 9ecH 1440 data 03,80,99,00,94,c8,c0,28, F6 
Sc#4 720 data 20,73,00,20,8b6,b0,20,73, 18 | Secc 11450 data deo,F3,18,ae,fS,9f,a8,00, 3d 
Schc 738 data 00,c9,20,F0,F3,4c,7b,9c, fa | SJed4 1460 data 20,0a,e5,40,80,a4,20,44, 67 
9034 748 data c9,3f,d0,06,20,73,08,20, 81 | Sedc 1470 data e5,a9,06,8d,20,d0,a9,20, af 
909c 7508 data 19,22,09,a0,d0,03,4c,98, eı | See 1480 data 8d,21,d0,a9,4c,85,37,a9, e8 
Sca4 768 data 9c,c9,a1,d0,1b,20,73,00, ı2 | Seec 1480 data Sa,85,38,a9,05,8d,85,2°, al 
Scac 770 data c9,23,d0,0b,20,73,00,20, F7 | Seft 1500 data a®,00,b9,07,3f,20,d2,ff, a2 
Sch4 780 data 9e,b7,a9,20,20,ff,ae,.20, ı3 | Sefc 1510 data c8,c0,4f,dO,fS,a9,8d,28, cl 
Schc 790 data 79,00,20,8d,b0,4c,7b,3c, 4£ | 3f04 1520 data d2,Ff,60,11,20,23,23,23, 1F 
Scc4d 6800 data c9,96,d0,21,20,73,00,20, 6£ | 3f0c 1530 data 23,23,23,20,50,52,4f,47, 09 
Scoc B1® data e1,b3,20,fa,ae,a9,80,85, 55 | 3f14 1548 data 2d,48,45,40,50,20,56,4f, 15 
Icd4 820 data 10,20,8b6,b0,20,8d,ad,20, eb gfic 155® data 4e,20,47,45,52,44,20,4B, 16 
Scdc 830 data F7,ae,a9,b2,20,ff,ae,20, er | If@4 1560 data Hf,45,48,4e,20,23,23,23, 1 
Sce4 840 data Ba,ad,4c,7b,9c,c9,84,d®, 35 Sf2c 1578 data 23,23,23,20,11,20,20,20, Fu 
Scec 850 data de,20,73,00,20,9e,b7,a9, fi Sf34 1580 data 20,20,43,42,4d,29,42,41, 2f 
Scft4 860 data ?c,20,Ff,ae,4c,87,9c0,c9, F5 Sf3c 1598 data 53,49,43,20,56,32,20,20, 51 
Scfc 870 data 85,d0,0F,20,73,00,c9,02, de Sf44 16008 data 298,33,37,34,35,31,20,42, d2 
S3dO4 880 data d®.F2.20,bd,ae,a9,3b,4c, 36 | Sf4c 1610 data 59,54,45,20,46,52,45,45, le 
Sddc 898 data f5,9c,c9,39,d8,3c,28,73, c93 

Sd14 900 data 00,c9,3a,F0,28,c9,00,E0, F3 


Sdic 910 data 24,c9,33,F0,23,c9,a6,F®, 1f 60908 For a-39508 to 48788 step H144 
Sde4 928 data 1F,c9,2c,f0,e9,c9,3b,f®, FE 8:5=9:c=d:Ffor b=® to 7: 

Sd2c 339 data e5,20,9e,ad,20,79,00,c9, 84 gosub 60048 

9d34 940 data 3a,f0,03,c9,020,F0,06,20, 84 60018 s-s+h+l-c:c=s>255:5=-255-5 5034 
Sd3c 9508 data 79,00,4c,1d,9d,4c,12,9b, SF and 255:poke a+tb,h+tl:next 

Sd44 960 data 20,96,b7,09,29,F0,c7,4c, 28 b:gosub 600490 

Sd4c 978 data 1a,9b,c9,98,d0,06,20,73, 27 60020 F$=-"pruefsumme ok”:if sc> 5699 
Sd54 9808 data 09,40,f0,9c,c9,93,d0,09, 94 h+l then f$="[rvs] 

SdSsc 9392 data 20,73,20,20,d4,e1,4c,7b, S2 pruefsummenfehler”:f=f+1 

Sd64 10900 data 9c,c9,94,d0,06,20,73,00, Fi 60039 gosub 68098:next a:print ” 2267 
Sd6c 1018 data 4c,5Ff,9d,c9,95,d0,06,20, 6d Cdoun]”f”fehler”:end 

9d74 1020 data 73,00,4c,5Ff,9d,4c,fa,9a, 198 60040 read h$:gosub 60050: h-1* 2715 
Sd7c 1030 data “4c,1d,9e,ad,f6,3f,c9,00, 3f 16:h$=-mid$ Ch$,2) 

SdE4 1040 data FO,OFf,ad,f1,9F,c9,14,dO, b7 60058 l=-asc ChS+”x")-4B:if 1<0 31398 
Sd8c 1050 data 08,29,00,8d,F1,9F,40,7c, f5 or 1>22 then 60089 

9d94 1068 data 9d,4c,17,9e,82,30,e1,8e, 76 60068 if 1<12 then return 1944 
SdSc 1070 data F1,9F,a4,3a,c8,f®,dc,B8, e7 68078 1-1-7:if 1>39 then return 1334 
Sda4 1088 data B4,15,35,39,85,14,20,a0, cb 60089 F$="[rvsleingabefehler”:1- 24568 
Sdac 1090 data e5,20,44,e5,39,e4,a2,9c, ef B:f-f+l 

Sdb4 1100 data 8d,00,03,88,01,03,20,13, @d 60032 print "zeile” peek (B4)* 2726 


a6,38,35,7a,e5,5f,8d,f2, b8 256+psek (63)f$:return 


Eingabefehler werden von diesem Programm sofort nach RETURN angezeigt 
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System: C64 + Floppy 
Typ: Anwendung 
Sprache: Basic/ASM 


Viele Basic-Programmierer träu- 
men von 3D-Animationen auf dem 
Commodore 64. „Turbo-Grafik" 
verhilft jetzt zu einem schönen Er- 
wachen. Das Programmpaket be- 
steht aus insgesamt 4 Listings. 
Listing 1 startet „Turbo-Grafik". 
Auf der Diskette müssen sich 
Listing 3:,GRAFIK.OB]" und 
Listing 4:,„CLIP.OBJ" befinden. 
Das vierte Programmlisting „Film- 
projektor" zeigt selbsterstellte Fil- 
me auf dem Commodore 64. 
Nachdem man alle Listings einge- 
tippt und gespeichert hat, startet 
man Listing 1 durch RUN. Kurz 
darauf erscheint das Hauptmenü: 

1. Körper positionieren: 

In diesem Menüpunkt bringt man 
den eingegebenen Körper, (wie 
man einen Körper eingibt, steht im 
Abschnitt „Eingabe von Körpern"), 
in die Bildschirmlage, die er im 
Verlauf des Trickfilmes einneh- 
men soll. Um an der Stelle weiter- 
zumachen, an der sich der Körper 
zuletzt befand, muß man „2" ein- 
geben. Vollkommen neu angefan- 
gen wird unter „l". Der Bild- 
schirm schaltet auf hochauflösen- 
de Grafik. Um dort weiterzuma- 
chen, wo aufgehört wurde, muß 
man auf den Feuerknopf des Joy- 
sticks, der sich im Joystickport 2 
befindet, drücken. Nach kurzer 
Zeit (höchstens eine Sekunde) er- 
scheint der Körper auf dem Bild- 
schirm. Ihn kann man nun mit dem 
Joystick folgendermaßen steuern: 
Joystick hoch: Drehen um 10 Grad 
gegen den Urzeigersinn. Joystick 
runter: Um 10 Grad zurückdre- 
hen. Joystick rechts: Verschieben 
um 5 Einheiten nach rechts. Joy- 
stick links: Verschieben um 5 Ein- 
heiten nach links. Wenn man den 
Feuerknopf drückt, verdoppeln 
sich diese Werte. Da man den 
Körper nicht gleichzeitig um alle 
Achsen drehen, beziehungsweise 
daran entlang verschieben kann, 
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Dreidimensionale Gra- 
fik superschnell auf 


dem C'64. Filmsequen- 
zen innerhalb von Mi- 
nuten selbst erstellen. 


wählt man die Achsen mit den Zif- 
ferntasten der Tastatur aus: „1" 
bedeutet, daß der Körper um die 
X-Achse gedreht beziehungswei- 
se daran entlang verschoben wer- 
den soll. „2" bedeutet hier, daß 
der Körper um die Y-Achse ge- 
dreht, beziehungsweise daran 
entlang verschoben wird. Hierbei 
ist zu beachten, daß sich der Kör- 
per nicht mehr nach rechts oder 
links verschiebt, sondern daß er 
zunter oder hoch verschoben 
wird. 


3D-Effekte inklusive 
FERSTTEIITTLTEER 


„3" bewegt den Körper um die Z- 
Achse. Er kommt, wenn man den 
Joystick nach rechts drückt, näher 
an den Betrachter heran. Es macht 
nichts, wenn der Körper nicht 
mehr auf dem Bildschirm zu sehen 
ist (zum Beispiel, wenn man rechts 
„hinausgefahren“ ist), da er trotz- 
dem noch korrekt berechnet wird 
und „zurückgeholt“ werden kann. 
Hat man den Körper in die ge- 
wünschte Lage gebracht, so ge- 
langt man mit Leertaste wieder in 
das Hauptmenü. „2“ führt in den 
Menüpunkt: 

2. Film erstellen: 

In diesem Unterprogramm erstellt 
man komplette Trickfilme wobei 
minimaler Zeitaufwand nötig ist. 
Der Computer berechnet den 
Trickfilm immer zwischen den Po- 
sitionen, wo sich der Körper be- 
fand, bevor er in die gewünschte 
Lage gebracht wurde und der jet- 
zigen Position. Dabei gibt „Anzahl 
der Bilder" an, in wie viele Ab- 
schnitte (ein Abschnitt entspricht 
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einem Bild) der Bewegungsablauf 
zerlegt wird. Eine hohe Zahl 
macht den Bewegungsablauf flüs- 
siger, kostet jedoch mehr Spei- 


‚cherplatz. Ein Beispiel: Wenn man 


einen Körper einmal um die eige- 
ne Achse rotieren läßt, positioniert 
man ihn erst in der gewünschten 
Lage. Dann entscheidet man: Soll 
die Bewegung flüssig aussehen, 
dann zeigt man weniger verschie- 
dene Filmabschnitte (nicht Bilder!) 
hintereinander, oder man will 
mehr Filmabschnitte, dann wirkt 
der Film abgehackter. Im ersten 
Fall sollte man eine Zahl um 36 
oder höher eingeben, im zweiten 
Fall eine Zahl um 18 oder niedri- 
ger. Der endgültige Film ist aus 
mehreren Abschnitten zusammen- 
gesetzt. Dies macht man, indem 
man den Körper positioniert, dann 
den Film berechnet, den Körper 
wieder positioniert (in dem Fall 
dann im Menüpunkt „Körper posi- 
tionieren“ auf die erste Frage mit 
„2 antworten), wieder einen Film 
berechnet, und so fort. Sollten sie 
insgesamt über 255 Bilder berech- 
nen wollen, oder reicht der Spei- 
cherplatz nicht aus, so springt das 
Programm wieder zu der Frage 
nach Anzahl der Bilder zurück. Ist 
der Film berechnet (die Berech- 
nung dauert nur sehr selten län- 
ger als eine Minute), gelangt man 
wieder ins Hauptmenü. 

Wenn man einen Film erstellt hat 
(also der Computer ihn berechnet 
hat), startet man im Hauptmenü mit 
Taste „3" den „Filmprojektor". 

3. Film zeigen: 

Dieser Menüpunkt zeigt den Film, 
den der Computer erstellt hat. 
Man drückt die Taste „l", um den 
Film zu starten. Durch Taste „2" 
gelangt man wieder in das Haupt- 
menü. Ist der Film beendet, ge- 
langt man durch Drücken einer 
beliebigen Taste (außer RUN/ 
STOP oder RESTORE) wieder ins 
Hauptmenü. Damit die Arbeit, die 
man sich beim Erstellen eines Kör- 
pers gemacht hat (siehe „Eingabe 
von Körpern"), nicht mit dem Aus- 


schalten des Computers zunichte 
gemacht wird, speichert Menü- 
punkt 4 den Körper, den man ge- 
rade bearbeitet, ab. In diesen Me- 
nüpunkt gelangt man durch Taste 
a 

4. Körper abspeichern: 

Speichert den Körper, den man 
gerade bearbeitet, ab. Dabei ist 
es jedoch ratsam, den Körper in 
die Ursprungslage zurückzuver- 
setzen, da nicht die Lage des Kör- 
pers, wohl aber sein momentanes 
Aussehen abgespeichert wird. 
Um den Körper in die Ursprungs- 
lage zu versetzen geht man in den 
ersten Menüpunkt, drückt dort 
Taste „l", und, ohne den Joystick 
zu bewegen, die Leertaste. Damit 
befindet sich der Körper wieder 
im Ursprungszustand. Bei der Fra- 
ge nach dem Filenamen gibt man 
den Namen ein unter dem der 
Körper abgespeichert wird. Ein 
„$" zeigt das Inhaltsverzeichnis 
der eingelegten Diskette an. Nach 
Drücken der Leertaste fragt der 
Computer wieder nach dem File- 
namen. Ist der Körper abgespei- 
chert, springt das Programm selb- 
ständig ins Hauptmenü zurück. 
Um einen Körper, den man abge- 
speichert hat, wieder zu laden, 
benutzt man Menüpunkt 5. Dorthin 
gelangt man durch Taste „5“. 

5. Körper laden! 

Lädt einen abgespeicherten Kör- 
per, um ihn wieder zu bearbeiten. 
Will man im Laufe der Bearbei- 
tung den Körper neu positionie- 
ren, muß man ihn erst neu laden. 


Bild 1: Das Projektionsverfahren 


Wie im Menüpunkt 4 (Körper spei- 
chern), gibt man den Namen ein, 
unter dem man den Körper ge- 
speichert hat. „$" zeigt ebenfalls 
das Inhaltsverzeichnis der einge- 
legten Diskette an. Ist der Körper 
geladen gelangt man automatisch 
ins Hauptmenü. Damit Filmpro- 
duktionen der Nachwelt erhalten 
bleiben, muß man im Menüpunkt 
6 den bisher erstellten Film ab- 
speichern. 

6. Film speichern: 

Filme, die man speichert, sollten 
fertig erstellt sein, da man sie spä- 
ter (nachdem man einen anderen 
Körper geladen, oder den Com- 
puter abgeschaltet hat) nicht mehr 
bearbeiten kann. Um sie vorzufüh- 
ren benutzt man das Programm 
Filmprojektor (Erklärung siehe 
unten). 


Filmen ohne Kamera 
[ix Ba Fran = | 


Wie bei den vorangegangenen 
Menüpunkten, gibt man auch hier 
den Namen ein, mit dem der Film 
gespeichert wird. Ebenso gelangt 
man, wenn der Film abgespei- 
chert ist, wieder ins Hauptmenü. 
7. Programm beenden: 

Durch Druck auf die Taste „l" be- 
endet man das Programm. Wenn 
man sich vertan hat, hilft Taste „2“. 
Mit ihr gelangt man wieder in das 
Hauptmenü. Aus allen Unterme- 
nüs (Programmabschnitten) 
kommt man durch Druck auf die 
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„Pfeil nach links“-Taste wieder ins 
Hauptmenü. Bei den Menüpunk- 
ten 2,4,5,6 muß man zusätzlich 
noch die RETURN-Taste drücken. 
Eingabe von Körpern: 

Die Körperdaten werden als 
Punktkoordinaten eines Linienzu- 
ges (Polygon) eingegeben. Dazu 
muß man sich im Direktmodus 
(das Programm darf nicht laufen) 
befinden. Die einzelnen Punkte 
des Linienzuges sind miteinander 
verbunden, und werden als X-, Y-, 
und Z-Koordinate in eine DATA- 
Zeile ab Zeilennummer 20000 ge- 
schrieben. Ein Beispiel: 20000 
DATA 5,6,3 definiert, daß der 
erste Punkt des ersten Linienzu- 
ges bei X=5, Y=6, und Z=3 liegt. 
Um nun zum Beispiel ein Quadrat 
um den Ursprung zu definieren, 
gibt man folgendes ein: 

20000 DATA —20,20,0 

20010 DATA 20,20,0 

20020 DATA 20,—20,0 

20030 DATA—20,—20,0 

20040 DATA —20,20,0 

Dieser letzte Punkt ist notwendig, 
um das Quadrat zu schließen. 
Grundsätzlich braucht man (pro 
geschlossenen Linienzug) eine 
DATA-Zeile mehr, als der Linien- 
zug Punkte hat. Wenn man den Li- 
nienzug fertig definiert hat, gibt 
man noch einmal (!) —1000 ein: 
20050 DATA — 1000 


‚Danach muß noch der Abstand 


des Ausgangspunktes (oder View- 
Point), also der Ort der fiktiven Ka- 
mera, und der Bildebene, auf die 
der Körper projiziert wird, vom 
Koordinatenursprung als Datum 
angegeben werden (siehe hierzu 
auch Bild |): 

20060 DATA 1000,50 

Damit ist das Quadrat als 'Körper' 
definiert. Um sich diese langweili- 
ge Tipparbeit zu ersparen, spei- 
chert man im Menüpunkt 4 den 
Körper um ihn später wieder la- 
den zu können. 

Filmprojektor: 

Das Programm „Filmprojektor" 
dient zum Vorführen von abge- 
speicherten Filmen. Nachdem es 
geladen und gestartet wurde, gibt 
man den Namen, unter dem man 
den Film abgespeichert hat, ein. 
Darauf wird der Film vom Compu- 
ter geladen. Nach einem Druck 


auf die Leertaste wird er vorge- ® 


Februar/87 UM 97 


führt. Sobald der Film zu Ende ist, 
und man die Leertaste gedrückt 
hat, fragt das Programm, ob man 
den Film noch einmal sehen möch- 
te. Ist dieses der Fall, so drückt 
man „J", sonst „N“. Drückt man 
„N‘, springt der Filmprojektor 
wieder an den Anfang. Dieses 
Programm dient als Beispiel, wie 
man Filme in eigenen Basic-Pro- 
grammen zeigt wobei man beach- 
ten muß, daß der Film ab $3000 im 
Speicher steht, so daß man noch 
10239 Bytes für Basic zur Verfü- 
gung hat. 


So sieht „Turbografik“ 
intern aus: 


Der Speicher wird vom Programm 


„Turbografik“ wie folgt belegt: 
$0100—$8C00: Frei 
$8C00—$9000: Colormap 1 
$9000—$A000: Maschinen- 
programm ] 
$A000—$C000: Bitmap 1 
$C000—$C440: Maschinen- 
programm 2 
$C440—-$CC00: Frei 
$CC00—$E000: Colormap 2 


$E000—$FFFF: Bitmap 2 

Die Körperdatei (Positionen der 
einzelnen Punkte des Körpers) ist 
wie folgt aufgebaut: 

Xd,Yd,Zd 

Anzahl der Flächen 
AP1,X0,Y0,20,X1,Y1l,21.... 
AP2,X0,Y0,20.X1,Y1,21.... 

AP8;. ..r 


Dabei geben Xd,Ydzd die 
Grunddrehung des Körpers von 
der Grundstellung an (Bei dem 
Programm Turbografik = 0). Der 
Wert „Anzahl der Flächen" gibt 
die Anzahl der vorhandenen Poly- 
gone an. Der Wert AP gibt die An- 
zahl der Punkte im jeweiligen Po- 
lygon an. Bis auf „Anzahl der Flä- 
chen“ und AP, die als Bytewerte 
angegeben sind, ist der Rest in 16- 
Bit-Integerzahlen angegeben. 

Zum Drehen des Körpers brau- 
chen diverse Routinen eine Ar- 
beitsdatei: 
Xtl,Ytl,Ztl 
Xd ‚Yd ‚Zd 
Xs ‚Ys ‚Zs 
Xt2,Yt2,Zt2 
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ViewPoint,Bildebene 
Auch hier werden alle Werte als 
16-Bit-Zahl angegeben. Der Index 
t steht für Translation (Verschie- 
bung), der Index d für Drehung, 
und der Index s für Skalierung. 
Hiermit sind einfache Vergröße- 
rungen und Spiegelungen an den 
Achsen möglich. ViewPoint und 
Bildebene haben die gleiche Be- 
deutung wie im Kapitel „Eingabe 
von Körpern". 
Die Bildinformationen werden so 
abgelegt: 
Eine Fläche: 
X0,Y0,20.X1,Y1 21... ;; 
$8000,$8000 
Ein Körper: 
AF,Flächel,Fläche2,Fläche3,.. .. 
AF bedeutet hier wieder die An- 
zahl der Flächen des Körpers. Bis 
auf AF, welches auch hier wieder 
als Byte angegeben wird, sind alle 
Angaben 16-Bit-Integerzahlen. Ein 
Film besteht aus der Aneinander- 
reihung mehrerer Körper. 
Nun aber die stichwortartige Be- 
schreibung der Maschinenrouti- 
nen: 
Mathematikroutinen: 
Arithmetikregister: 
AB bei $61—$62 
CD bei $63—$64 
Beide Register in High-low Rei- 
henfolge, das heißt: Highbyte in A 
($61), Lowbyte in B ($62). 
Mult: Multil : AB 
Mult2 : CD 
Call $9000 
Erg: ABCD 
(X/Y=Z) 
X: ABCD 
Y.:$69/$6A Wie AB 
Call $90B7 
Z: AB 
Div32:(X/32768=Z) 

X: ABCD 

Call $914F 

Z: AB 
ADD:(X+Y=2Z) 
X: AB 
ER) 
Call $916A 
2:CD 
(X-Y=2) 
X:AB 
YıcD 
Call $9178 
2::CD 
Sin: ((Sin X)*32768 = Z) 

X: AB 


Div: 


SUB: 
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Call $9187 
Z: AB 

Cos: ((Cos x)* 32768 = Z) 
X: AB 


Call $92B0O Z: AB 
Transformationsroutinen: 
Register: 
X-Koord., Y-Koord., Z-Koord. 
$033C $033E 50340 
WX ‚WY ‚WZ 
50342 50344 $0346 
Rotate: (Rotiere (x,y,z) um 
(wx,wy,wz) Grad) 
XZVCKNZ 
wx,wy,wz : WX,WY,WZ 
Call $92DA 
nx,ny,nz:X,Y,Z 
Translate: (Verschiebe (x,y,z) um 
(wx,wy,wz) Einheiten) 
VERY. 2 
wx,wy,wz : WX,WY,WZ 
Call $94EF 
nx,ny,nz:X,Y,Z 
Skalate: (Multipliziere (x,y,z) mit 
(wx,wy,wz2)) 
KUZERN.Z 
wx,wy,wz : WX,WY,WZ 
Call $955D 
nx,ny,nz:X,Y,Z 
View: (Rechne (x,y,z) in Bild- 
schirmkoordinaten um, wo- 
bei WX der Viewpoint, und 
WY die Bildebene ist) 
xX,yz2:X,Y,2 
ViewPoint : WX 
Bildebene : WY 
Call $95CB 
bx:X 
Hy: 
Zeichnenroutinen: | 
Line: (Ziehe Linie von (x0,y0) 
nach x1,y1) mit BF=]: Zeich- 
nen und BF=0 Löschen) 
x0 :$5A (16 Bit) 
y0:$5C (8 Bit) 
x1:$5E (16 Bit) 
y1:$55(8 Bit) 
BF : $02 | 
Call $96C0 | 
(Den angezeigten Bild- 
schirm mit dem Bildschirm 
vertauschen, auf den sich 
die Zeichenbefehle bezie- 
hen) 
Call $987B 
(Einschalten der Grafik) 
Call $98CE 
Groff: (Ausschalten der Grafik) 
Call $98DE 
Grelr:(Löschen der Grafik) 
Call $98EE) 


Swap: 


Grin: 


Dflae: (Zeichne die Fläche, auf die 

der Zeiger BIL zeigt) 

BIL : $45 

Call $9950 
Dframe: (Zeichne den Körper, auf 
den der Zeiger BIL zeigt) 

BIL : $45 

Call $99C6 
Routinen zum Drehen von Flächen 
und Körpern: 
Fläche: (Bearbeitet wird die Flä- 
che, auf die der Zeiger FLP zeigt, 
mit Hilfe der Arbeitsdatei, auf die 
der Zeiger WRP zeigt) 

FLP : $47 

WRP:$F9 

Call $9AOF 
Das Ergebnis wird an der Stelle 
abgelegt, auf die der Zeiger BIL 
zeigt. 

BIL : $45 

Zu bemerken sei noch, daß sich 
die Routine den Drehungsgrad 
der Fläche merkt. 
Frame: (Bearbeitet wie oben ei- 
nen ganzen Körper, nur ist hier 
der Zeiger auf den Körper der 
FRP) 


gem \FECCCEECCEEEECEECECECEECECCEZ 


rem 
rem turbografik 


FRP: $71 

WRP : $F9 

Call $9B6C 
Flzero: (Setzt die Drehung der Flä- 
che wieder auf den Ursprungszu- 
stand) 

Call $9B56 
Frzero: (Wie oben, nur für den 
Körper) 

Call $9c73 
Clipping: 
Diese Routine schneidet Linien am 
fiktiven Bildschirm Xmin,Xmax,Y- 
min, Ymax ab. Flag gibt an, ob die 
Linie gezeichnet werden soll. 
(O=zeichnen) 

Xmin : $C436 

Xmax : $C432 

Ymin : $C438 

Ymax : $C434 

Flag : $CBAO 

Die Koordinanten der Linie 

wie beim Line-Befehl. 

Call $C000 
Der Rest des Maschinenprogram- 
mes dient zum Steuern der be- 
schriebenen Maschinenroutinen, 
und ist nur als Demonstration ge- 
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dacht. 

Listing 3 und 4 sind als kombinier- 
ter Hexdump-Basiclader abge- 
druckt. Wie man mit dieser Art 
von Listings umgeht, steht auf Sei- 
te 83. Wird das Programm als Ba- 
siclader eingegeben, so muß der 
Lader vor dem Start abgespei- 
chert werden. Nach RUN werden 
die Daten in den Speicher gepo- 
ket. Das fertige Maschinenpro- 
gramm wird mit: 

Listing 3: 

POKE 43, 0: POKE 44,144 

POKE 45,233: POKE 46,159 

SAVE, grafik.obj",8 

Listing 4: 

POKE 43, 0: POKE 44,192 

POKE 45, 60: POKE 46,196 
SAVE,clip.obj",8 

auf Diskette abgespeichert. Wer- 
den die beiden Programme als 
Hexdump eingegeben, so muß 
der Checker benutzt werden. Als 
Startadresse ist 9000 für Listing 3 
und C000 für Listing 4 (clip.obj) 
einzugeben. 

Martin Leibbrand EEE 


print :print ”"[4spaces]S....koerper 


print :print "[4spaces]6....film 


rem B 
rem ”B(c) by united artist softwareB 
rem "B 
rem programmed by B 
rem B 
d rem " martin leibbrandt B 
rem B 
rem 13.7.1986 B 
rem B 
rem ” ICCCCCCCCCCCCCECCCCCECCCCCCECCCCH 
if l1=-1 then 1708 
poke 2,1 
if a=-® then a=1:load "grafik.obj”,8,1 
if a=-1 then a=2:load "clip.obj”,8,1 
poke 56,48:clr :1l0=1 
dim 1%(50) 
w1=-40103: w2=48107: £f1-48895: f2=-490099: 
b1=-49111:b2=49115: al=40785: an=®:sa=1 
movie-49457 : show=406B7 : again=40789: 
clear=48825 
b3=49787 : b4=40788B 
if 1-1 then 5128 
gosub 10908 
print "[elr)”; 
® print spc(9)”[chm a] 
ECCCCCCCCCCCECCCECCCEchm s]” 
print spc(9)"B[L28spaces]B” 
print spc(9)"B[Sspaces)hauptmenus 
[5spaces]B” 
print spc(9)”B[L28spaces]B” 
print spc(9)”[cbm z] 
CCECCCCCECCCECCCCECCCCEchm x3” 
print :print :print spe(14)”wollen sie 


print :print :print "[4spaces] 
1....koerper positionieren” 

print :print ”[4spaces]2....Film 
erstellen” 

print :print ”[4spaces]3....film 
zeigen” 

print :print "[4spaces]“4....koerper 
abspeichern” 
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speichern” 
print :print "[4spaces)]7....program 
beenden” 
get a$:if a$<"1"” or a$>"7"” then 318 
en=d 
on val (a$) gosub 1800, 2000,30080,4000, 
5920,80008,7288 
if en=1 then 348 
goto 188 
end 


print "Cclr)”; 

print spe(S)”"[cbm a) 
CCCCCCCCCECLECCCCECCCEcbm s)” 

print spc(S)"B[l21spaces)B" 

print spce(9)"Bkoerper positionierenB” 
print spc(9)"B[21spaces)B” 

print spc(9)"[cbm z) 
CCLELLCCCCCCCCCECCECCC[chm x3” 

print :print :print spc(14)”wollen sie 


print :print :print ”"[Sspaces]i....neu 
anfangen” 

print :print "[S5spaces] 

@....weitermachen” 

get a$:if a$<>”"1” and a$<>”2” and a$<> 
”+-" then 12898 

if a$-"-"” then return 

if a$=-"1" and sa=l then an=d:sa-d:sys 

clear:a$-"«” 

if aS="1" and sa=® and lo=1 then an=®: 

sa=-d:gosub 181408:sys clear 

if a$=-"1” and sa=® and lo-=® then goto 
1808 

if a$=-"2”" and sa-1 then sa-d:sys clear 
if a$=-"2” and sa=® then sys again 

poke 198,0 

return 

print "Ceclr}”; 

print spc(9)”[cbm a] 

CCCCCCCCCCECCCCCCCCCC[chm s]” 

print spc(9)"B[28spaces]B” 
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print spc(9)”B[l3spacesjfilm erstellen 
C3spaces]B” 

print spc(9)"B[20spaces]B" 

print spc(S)”[cbm zZ] 

ECCCCCCCCCECCCCCCCECCCchm x3” 

print :print :print "bitte anzahl der 
bilder eingeben”; 

input ai$ 

if ai$-"«-” then return 

ai=val (ai$) 

if an+tai>255 then 2000 

fg*-peek (12294):rr=-peek (f1l)+peek 
(f2)*256:tt=peek (wi)+peek (w2)*256 
pp*Cttt-rr)-7-fg)/6 
ee=-((Can+ai)*CCpp+1)*4+4#lfg+1)+4))+1*+ 
18 

if se>24576 then 20568 

poke al,ai 

sys movie 

an=-antai 

return 

print "Colr)” 

print spc(S)”[cbm a] 
CCEECCCECCCCCCCCCCECCEchm sI” 

print spc(9)"B[28spaces]B” 

print spc(9)"B[3spaces)film abspielen 
E3spaces]B” 

print spc(9)”B[28spaces]B” 

print spc(9)”[cbm zZ] 

CELCCCCCCCCCCCCECCCCCchm x” 

print :print :print spc(14)”wollen 
sie:” 

print :print ”"[4spaces]1....film 
abspielen” 

2 print :print "[4spaces]2....zurueck 
zum menue” 

get a$:if a$<>"”1” and as<>"2” and a$<> 
"”-" then 3898 

if a$=-"2" or a$="«"” then return 

if an<l1 then print :print "[4spaces] 
kein film vorhanden”:wait 198,1:poke 
198,8: return 

poke al,an 

sys show 

get a$:if a$="” then 3111 

sys 39134 

return 

print *[c1ir)”; 

print spc(3)”[chbm a] 
CECCCCECECCCCCECCCCCCchm sI” 

print spc(3)"B[L28spaces)B” 

print spc(9)”B koerper speichern 
C2spaces]B"” 

print spc(9)"B[L208spaces]B” 

print spc(9)”C[Ccbm z)] 
ELCCCCCECCCCCCCCCCCCLchm x]” 

print :print :print "[5Sspaces)bitte 
Filenamen eingeben”; 

input fFi$ 

if fi$=-"$” then gosub 6000:goto 5098 
if fi$=-"-” then return 

open 1,8,1,fi$+".ko,p,w” 

open 15,8B,15:input#15,a::if a<>® then 
close 1:close 15:goto 49988 
print#1,chr$ (®);chr$ (48); 

for i=12288 to si 

print#1,chr$ C peek (i)); 

next i 

print#1:close 1 

input#15,a:if a<>® then open 1,8,15, 
”s:”+fi$:close 1:close 15:goto 49898 
close 15 

open 1,8,1,fi$+”".da,p,w” 
print#1,peek (wl):print#1,peek (w2): 
print#1,psek (f1) 

print#1,peek (f2):print#1,peek (b1): 
print#1,peek (b2) 

print#1,peek (b3):print#1,peek (b4) 
print#1:close 1:return 

print "[clr)”; 

print spc(9)”[cbm a] 

CLCCCCECCCECCCCCCECCEchm s}” 

print spc(S)”B[l20spaces]B” 

print spc(S)"B[l4spaces]Ikoerper laden 
[3spaces]B” 


2343 


1311 
3844 


3996 


333 
878 
778 
1088 
5085 


2408 
3527 


1407 
635 
867 
338 
142 
495 

3625 


1311 
2286 


1311 
3844 


2332 
2161 
2648 
3873 


1863 
4471 


795 
536 
1512 
818 
142 
495 
3625 


1311 
2473 


1311 
3844 


39346 


343 
1842 
888 
2078 
3833 


1784 
1128 
1239 
276 
586 
4349 


479 
1978 
2573 


[4121-74] 


1662 
748 
435 

3625 


1311 
2008 


so4@ 
5050 


1,1274) 


5078 
SoB2 
se81 
spB2 
5838 


5108 
Ssı19 
5128 
5138 


5148 
5158 
5168 


5178 
5171 
5188 
6900 
6018 
6028 
60921 
6038 
6040 


6058 
6068 
60798 
6088 
6039 


61008 


6118 
6128 
6138 
6140 
6158 
6162 


6178 
6188 
7288 
7810 


790208 
70308 


79040 
7950 


7068 
7878 
70828 
7039 
71908 
7118 
71208 


7138 
7148 


7158 
7168 


7178 
7188 
7198 
7208 


8000 
8210 


print spc(9)"B[L208spaces]B” 

print spc(9)”[chbm z] 
ECEECCECECCCCCCECCCC[cbm x3” 

print :print :print ”"[Sspaces)bitte 
filenamen eingeben”; 

input fi$ 

if fi$=-"$” then gosub 56808:goto 5888 
if Fi$=-"-” then return 

open 2,8,0,fi$+”.ko,p,r” 

open 1,8,15:input#1,a:if a<>8 then 
close 1:close 2:goto 50088 

close 2:close 1 

l=-1:load fi$+”.ko”,8,1 

open 1,8,2,fi$+”.da,p,r” 
input#1,a:poke wi,a:input#1,a:poke 
a 

input#1,a:poke f1,a:input#1,a:poke 
a 

input#1,a:poke bl,a:input#1,a:poke 

a 

input#1,a:poke b3,a:input#1,a:poke 

a 

close 1 

lo=® 

goto 198 

print ”"C[Cclr)]”; 

close 15:close 2 

open 15,8,15,”"i”:open 2,8,2,”#” 

if a$=-"G” then 6108 

vi=18:v2=1 

print#15, "ul”;2;0;v1;v2:print#15, ”b-p” 
;2;8 

get #2,x$:vl=asc (x$S+chr$ (8)) 

get #2,x$:v2=asc (x$+chr$ (8)) 

for x=® to 7:print#15, "”b-p";2;x*32+2 
get #2,x$:if x$5="”"” then 61508 
print#15, "b-p"”;2;x*32+5:ff3="":for y= 
8 to 15 

get #2,x$:if asc (x$+chr$ (98))-16® 
then 6138 

FES=-FFS+x$ 

next y 

if r=® then r=1:print Ff$S;:goto 6152 - 
r=-d:print tab(29);Fff$ 

next x:if v1<>® then 60840 

close 2:close 15:print :print :print 
spc(18)”bitte space druüecken” 

get a$:if a$="” then 6178 

return 

prine- *teie3”; 

print spc(S)”"[chm a] 
CCCLCECCCCCECCCCCCCCCCEchm s]” 

print spc(S)"B[L28spaces]B” 

print spce(S)"B[l2spaces]program beenden 
C3spaces]B” 

print spc(S)"”"B[l20spaces]B” 

print spce(S)"[chm zI 
ECCCECCCECECCCCCECCCElchm x” 

print :print :print spc(14)"wollen 
sie:” 

print :print :print "[4spaces] 
1....program beenden” 

print :print "[4spaces]2....zurueck 
zum menue” 

get a$:if a$<>"1” and a$<>”2” and a$> 
”-” then 7098 

if a$=-"2" or a$="«-"” then return 
print ”"Cclr)”; 

print spc(9)”"[cbm a] 
ECCCCCCCCCCCCCCCECCCCCchm s]” 

print spc(S)”"B[28spaces]B"” 

print spc(9)”B[Sspaces]good bye! 
[6spaces]B” 

print spc(3)”"B[28spaces]B” 

print spc(9)”[chbm z] 
CECCECCCCCCECCCCCCCCC[Echm x3” 

print :print :print "[3spaces]lich 
hoffe, dass es spass gemacht” 

print "[3spaces]hat, dieses programm 
zu bedienen” 

print :print :print 

en=l:return 

print ”"[clr]”; 

print spc(9)”[cbm a) 
CECCCCCCCCCCCCECCCECCCchm s]” 
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8028 print spc(S)"B[L28spaces]B” 
8038 print spc(9)"B[3spaces]Jfilm speichern 
C3spaces]B” 
8048 print spc(9)"B[L20spaces]B” 
88508 print spc(9)"[cbm z] 
CCLCCCECCCECCCCCCECCCchm x1” 
8068 print :print :print "[Sspaces]bitte 
N Filenamen eingeben”; 
8078 input Fi$ V 
8088 if Fi$=-"$" then gosub 6008:goto 8008 
8081 if Fi$="”«-" then return 
8082 if an<i then print :print "[4spaces) 
kein film vorhanden”:wait 198,1:poke 
198,0: return 
8083 aa-peek (b3)+peek (b4)*256 
8084 Fg-peek (12294):rr=-peek (fl)+peek 
(f2)*+256:tt=peek (wl)+peek (w2)*256 
8085 pp*=C(tt-rr)-7-fg)/6 
8088 ee-aa+((an)*(pp*4+4*Ffg+4))+1+10 
8883 open 15,8,15:0open 2,8,2,fi$+"”.fil,p,w” 
8838 input#15,a,b$,c,d:if a<>® then close 
15:close 2:print b$; :wait 198,1:poke 
198,8:goto 80080 
8092 print#2,chr$ (®);chr$ (48); 
8108 for i-12288 to ee:print#2,chr$ ( peek 
Ci));:next i 
8118 print#2:close 2 
8128 input#15,a,b$,c,d:if a<>® then print# 
15,”"s:”+FiS+",Ffil”:close 15:goto 8002 
8138 open 2,8,2,fi$+” .fda,p,w” 
8140 print#2,an:print#2,peek (b3):print#2, 
peek (b4) 
81508 print#2 
8168 close 2 
8178 return 
109828 rem WERE EEE En 
18012 rem * “ 
180208 rem * initialisierung “ 
18230 rem * * 
188408 rem DEE ZZ ZZ ZZ ZU ZU ZU ZZ N ZZ ZZ zz ZZ ZZ ZU 2 0: 
18858 poke 53280,8:poke 53281,0 
18868 print ”Cclr,grn)”; 
18878 print spc(7)”Cchbm a] 
ECCECCCECCCCCCCCCCCCCCCCchm s] 
18888 print spc(7)”BL23spaces]B 
18898 print spc(7)"Bich lese die punktdatenB 
18190 print spc(7)"B[l23spaces]B 
18118 print spc(7)"Bl6spaces)bitte warten 
[5spaces]B 
181228 print spc(7)"BL23spaces]B 
108138 print spc(7)”Ccbm zZ] 
ECCECCCCCCCECCCCCCCECECCECECcbm x3 
18148 i-12288:for a-® to S:poke i+a,B:next 
a:a=1:b=1:i-i+6:pp-®:restore 
18158 read c:if c>-1008 then b=-b+1:goto 
190150 


Listing 1: Startet das Turbo-Grafik-Programmpaket 


poke 56,41 
poke 2,1 
rem ECCCCCCCECECCECCECECCECCCCECCCEC, 
rem B 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem ”"B by martin leibbrandt B 
rem ”B B 
rem " ACECCCCCCLECCCECCCCCECCCCCCCCECH 
if lo=1 then 1908 
if aa=® then aa-1:load ”grafik.obj”,B, 
1 
if aa-l1 then aa=-2:load "clip.obj"”,8,1 
poke 53288,8:poke 53281,08:print ”Cclr, 
grn]"”; 
a1=-40785: movie=40687 : b3=-40787 : b4=40788 
print :print spce(1B8)”Filmprojektor” 
print :input "bitte geben sie den 
filenamen ein”;fi$ 


film routine 
zur turbografik 


copyright u a software 


10168 1%la)-b/3:a-a+l:b-1 

18178 read c:if c>-19808 then 19158 
19171 restore :fg-a 

18172 poke i,a-1:i-i*+1 

18188 for c=1 to a-1:poke i,1%Cc):i-i+1 
10198 for d=1 to 1%Cc) 

108191 read e:if e<® then e=-65535+e 
180208 F=int (e/256):g-int (e-F*256) 
10218 poke i,g:i-i+l:poke i,Ff:i-i+1:pp=pp+1 
18220 read e 

102380 if e>® then e=-65535-e 

190248 if e<® then e--e 

102508 F=int (e/256):g-int (Ce-F*256) 
10268 poke i,g:i-i+1:poke i,f:i-i+1 
10261 read e:if e<® then e-65535+e 
18278 F-int (e/256):g*-int (e-f*256) 
19288 poke i,g:i=i+1:poke i,Ff:i-i+1 
180298 next d:read e:next c:read e 

10291 a-int (i/256):b-=int (i-a*256) 
18300 poke wi1,b:poke w2,a 

18318 poke f1,8:poke f2,4B 

18328 For a=® to 11:poke i+a,®:next 
18338 i-i+12:for a=® to 5 step ?2:poke i+a,l: 


poke i+ta+1,8:next a 


10348 i-i+6:for a-® to 5:poke i+ta,®:next a 
18358 i-i+6 
180351 for a-l1 to 2:read e:g-int (e/256):f- 


int (e-g*256) 


10352 poke i,f:poke i+ti,g:i-i+2:next a 
18368 a-int (i/256):b=-int (i-a*256) 
108378 poke bi,b:poke b2,a:poke b3,b:poke b4, 


a:si=-i 


10388 return 

20008 rem punktkoordinaten des koerpers 
20010 data -498,0,0 

20020 data -49,20,0 

20038 data -30,20,0 

20048 data -30,10,0 

20058 data -40,10,0 

20860 data -30,0,8 

20078 data -1998 

2008808 data -10,20,8 

20030 data -19,0,0 

20100 data 2,0,0 

20110 data 2,20,9 

20120 data -1800 

20130 data 20,2,0 

20140 data 20,20,0 

20150 data 30,0,0 

20168 data 30,20,0 

20170 data -19008 

20188 data -1008 e 
20208 rem viewpoint,bildflaeche 
20210 data 10008C4spaces), 58 


190 


200 

210 

229 
19090 
1018 
1038 
1031 
1242 
1050 
10608 
1078 
10808 
1081 
10328 
11008 


1118 
1120 


open 2,8,8,fi$+”.fil,p,r":open 1,8,15: 
input#1,a,b$,c,d 

if a‘>® then close 2:close 1:goto 169 
close 2:close 1 

lo=1:l10oad Fi$+”.fil”,8,1 

open 2,8,0,fi$+”.fda,p,r” 
input#2,a:input#2,b: input#2,c 

poke b3,b:poke b4,c:poke al,a 
close 2 

print "bitte taste druecken” 

get a$:if a$=-""” then 1958 

sys movie 

poke 198,0 

get a$:if a$-""” then 1088 

sys 39134: print "[clr]”; 

print "noch einmal ?” 

get a$:if a$<>”j” and a$<>"n” then 
1188 

if a$=-"j" then print "C[clr)”;:goto 
1838 

goto 168 


Februar/87 Un 101 


Praxis Listing 2:0 = serie warn 
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9220 
9908 
9210 
9018 
9220 
9228 
9230 
9238 
90940 
9248 
9950 
9958 
9960 
9068 
9070 
9078 
9080 
9288 
9998 
9838 
9930 
9038 
92b8 
90bB 
92c28 
908c8B 
9048 
9248 
9082 
9088 
Sorfo 
9arF8 
9122 
9188 
9118 
9118 
91298 
9128 
9130 
9138 
9149 
9148 
91598 
9158 
91608 
9168 
9178 
9178 
9188 
9188 
5198 
9198 
S1a8 
91a8 
91b8 
91b8 
91c® 
S1c8 
91d2 
91d8 
Sled 
91e8B 
SırFoa 
sırB 
9200 
9208 
92128 
9218 
9222 
9228 
9238 
9238 
9249 
9248 
92508 
9258 


48,8a,48,98,48,29,00,85, 
65,ad,4e,803,d®,0e,a5,62, 
d®,06,35,61,c9,80,f0,1c, 
a5,61,18,18,a9,00,8d,4e, 
03,29,00,38,e5,62,85,62, 
a9,00,e5,61,85,61,a9, ff, 
45,65,85,65,85,63,10,13, 
38,39,00,e5,64,85,64,a9, 
00,e5,63,85,63,a9,ff,45, 
65,85,65,a2,10,a9,00,85, 
69,85,63,85,6b,85,6c,06, 
64,26,63,990,19,18,a5,62, 
65,60,85,60,35,61,65,6b, 
85,6b,a9,00,65,6a3,85,6a, 
a9,00,65,69,85,69,ca,F®, 
0b,06,6c,26,6b,26,6a,26, 
69,4c,57,90,35,6c,85,64, 
a5,6b,85,63,35,6a,85,62, 
a5,69,85,61,35,65,f0,19, 
a9,00,38,e5,64,85,64,a9, 
00,e5,63,85,63,39,00,e5, 
62,85,62,39,00,e5,61,85, 
61,68,a8,68,a3,68,60,a9, 
00,85,6b,85,6c,85,65,35, 
61,10,1F,38,39,00,e5,64, 
85,64,29,00,e5,63,85,63, 
a9,00,e5,62,85,62,a9,00, 
e5,61,85,61,a9, ff ,45,65, 
85,65,a5,69,10,13,38,a9, 
008,e5,62,85,63,39,00,e5, 
69,85,69,a9,ff,45,65,85, 
65,80,11,38,a5,62,e5,6a, 
a5,61,e5,69,b9,1?,06,64, 
26,63,26,62,26,61,06,6c, 
26,6b,88,d0,e6,4c, 35,91, 
38,85,62,e5,63,85,62,a5, 
61,25,69,85,61,06,64,26, 
63,26,62,26,61,38,26,6c, 
26,6b,88,d0,c6,a5,6c,85, 
62,a5,6b,85,61,85,65,F®, 
04,38,39,00,e5,62,85,62, 
a9,00,e5,61,85,61,60,06, 
63,26,62,26,61,39,20,10, 
02,e6,62,85,61,85,63,a85, 
62,85,64,29,00,85,61,85, 
62,60,18,a5,64,65,62,85, 
64,a5,63,65,61,85,63,60, 
38,a5,62,e5,64,85,64,a5, 
61,e5,63,85,63,18,60,a5, 
61,d0,42,a5,62,30,04,c9, 
5b,30,53,c9,b4,10,0a,a9, 
b4,38,e5,62,85,62 ,4c,ed, 
91,85,62,38,e9,b4,85,62, 
a3,00,85,61,28,ed,91,38, 
a9,00,e5,62,85,62,29,00, 
e5,61,85,61,18,35,62,d®, 
0b,35,61,c9,80,d0,05,a9, 
01,8d,4e,03,60,a5,62,c9, 
Of,30,ce,a9,68,38,e5,62, 
85,62,18,20,ed,91,38,a9, 
00,e5,62,85,62,49,00,eS, 
61,85,61,18,60,36,62,bd, 
fa,91,85,62,bd,55,92,85, 
61,60,80,3b,77,b2,ed,27, 
61,99,d0,06,3a,6c,9c,cb, 
f7,20,48,6c0,8d,ac,c7,df, 
£3,803,20f,18,1c,1c,17,®e, 
08,ec,d4,b6,33,63,3c,08, 
cd,8d,46,F9,a6,4b,ea,B2, 
13,9c,1f,9a,0d,79,dd,39, 
8d,d9,1d,59,8c,b7,d9,f3, 
04,2c,0b,01,ef,d3,ad,?7Ff, 
47,06,bc,68,0a,a3,32,bB, 
33,a5,8e,6c,c1,8b,4c,83, 
bd,d3,ec,fb,00,00,02,04, 
06,88,0b,0d4,0F,11,14,16, 
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18,1a,1c,1e,21,23,25,27, 
29,2b,2d,2f,32,34,36,38, 
3a,3c,38,40,41,43,45,47, 
49,4b,4d,4e,50,52,53,55, 
57,58,53,5c,5d,5f,60,62, 
63,64,66,67,68,6a,6b,6c, 
6d,68,6f,71,72,73,74,74, 
75,76,77,78,79,79,7a,7b, 
7b,7c,7c,7d,7d,7e,7e,7e, 
70,98, 76,96 ,976,76,7E,80; 
a5,61,d0,10,35,62,18,69, 
5a,85,62,39,00,65,61,85, 
61,4c,87,91,35,62,c9,®e, 
30,ea,18,69,54,38,e3,68, 
85,62,18,a9,00,85,61,4c, 
87,931,48,83,48,98,4B,ad, 
3c,03,85,64,ad,3d,23,85, 
63,ad,46,03,85,62,ad,47, 
03,85,61,20,b9,92,20,00, 
990,20,4f,91,a5,63,85,6d, 
a5,64,85,6e,ad,3e,03,85, 
64,ad,3f,03,85,63,ad,46, 
03,85,62,ad,47,03,85,61, 
20,87,91,20,00,90,20,4F, 
S1,35,6d,85,61,35,6e,85, 
62,20,78,91,35,63,8d4,48, 
03,a5,64,8d,49,03,ad,3e, 
03,85,64,ad,3Ff,03,85,63, 
ad,46,03,85,62,ad,47,03, 
85,61,20,b0,92,20,00,390, 
20,4F,91,a5,63,85,6d,a5, 
64,85,68e,ad,3c,03,85,64, 
ad,3d,83,85,63,ad,46,03, 
85,62,ad,47,03,85,61,20, 
87,91,20,00,90,20,4F,31, 
a5,6d,85,61,35,6e,85,62, 
20,63,91,a5,63,Bd,4a,03, 
a5,64,8d4,4b,03,ad,48,03, 
85,63,ad,49,03,85,64,ad, 
44,03,85,62,ad,45,03,85, 
61,20,b0,92,20,00,30,20, 
4f,91,a5,63,85,6d,a5,64, 
85,6e,ad,40,03,85,64,ad, 
41,03,85,63,ad,44,03,85, 
62,ad,45,03,85,61,20,87, 
91,20,00,90,20,4Ff,31,a5, 
6d,85,61,a5,6e,85,62,20, 
62,931,a5,63,8d,3d,03,a5, 
64,8d,3c,03,ad,40,03,85, 
64,2d,41,03,85,63,ad,44, 
03,85,62,ad,45,03,85,61, 
20,b0,92,20,00,90,20,4F, 
91,a5,63,85,6d,35,64,85, 
Ge,ad,48,03,85,63,ad,49, 
03,85,64,ad,44,03,85,62, 
ad,45,03,85,61,20,87,91, 
20,00,30,20,4f,91,a5,6d, 
85,61,a5,6e,85,62,20,78, 
91,35,63,8d,4c,03,35,64, 
8d,4d,03,ad,4a,03,85,63, 
ad,4b,03,85,64,ad,42,03, 
85,62,ad,43,03,85,61,20, 
b90,92,20,00,90,20,4f,31, 
a5,63,85,6d4,35,64,85,6e, 
ad,4c,03,85,63,ad,4d,03, 
85,64,ad,42,03,85,62,ad, 
43,03,85,61,20,87,31,20, 
00,90,20,4f,91,a5,6d,85, 
61,a5,6e,85,62,20,78,931, 
a5,63,8d,3f,03,85,64,8d, 
3e,03,ad,4c,03,85,63,ad, 
4d,23,85,64,ad,42,03,85, 
62,ad,43,03,85,61,20,b®, 
92,20,00,90,20,4f,91,a5, 
63,85,6d,a5,64,85,6e,ad, 
43,03,85,63,ad,4b,03,85, 
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64,ad,42,03,85,62,ad,43, 3720 8d,58,97,bd,40,98,8d,99, 
03,85,61,20,87,91,20,00, 93728 97,a5,61,d80,10,a5,60,c5, 
90,20,4f,91,a5,6d,85,61, 3738 63,b8,03,35,60,36,63,85, 
a5,68,85,62,20,68,31,a5, 93738 63,86,60,90,18,ad,95,97, 
63,8d,41,03,35,64,8d,4®, 9748 ae,S8,97,8d,98,97,8e,S5, 
03,68,38,68,a3,68,560,“B, 9748 97,ad,96,97,ae,99,97,8d, 
Ba,48,98,48,ad,3c,03,85, 9758 99,97,88e,36,37,35,61,4a, 
62,ad,3d,83,85,61,ad,42, 9758 85,62,85,60,63,69,00,85, 
03,85,64,ad,43,03,85,63, 9768 69,35,60,85,67,85,61,85, 
20,68,91,35,64,8d,3c,03, 9768 68,20,74,96,18,a5,63,65, 
a5,63,8d,3d,03,ad,3e,03, 93770 693,85,69,990,02,e6,6a,a5, 
85,62,ad,3Ff,03,85,61,ad, 9778 68,c5,61,90,1a,d0,08,a5, 
44,03,85,64,ad,45,03,85, 9788 69,c5,60,90,12,f0,10,38B, 
63,20,68,91,35,64,8d,3e, 9788 a5,69,e5,60,85,69,a5,6a, 
03,35,63,8d,3F,03,ad,4®, 9798 e5,61,85,6a,20,c6,97,20, 
03,85,62,ad,41,03,85,61, 9798 c7,37,85,67,d0,07,35,68B, 
ad,46,03,85,64,ad,47,03, 97a8 d®,21,60,c6,68,c6,67,20, 
85,63,20,68,91,a5,64,8d, 97a8 9Se,36,4c,6c,97,a5,57,d®, 
40,03,a5,63,8d,41,03,68, 97b8 02,c6,58,c6,57,29,07,d®, 
a8,68,a3,68,60,48,Ba,"4B, 97b8 2d,c6,58,35,57,38,e9,38, 
98,48,ad,3c,83,85,62,ad, 97c8 85,57,b80,22,c6,58,60,e6, 
3d,83,85,61,ad,42,03,85, 97c8 57,d0,02,e6,58,35,57,aa, 
64,ad,43,03,85,63,20,00, 97d® 29,07,d0,f2,8a,e6,5B,18, 
90,85,64,8d4,3c,83,35,63, 97d8 69,38,85,57,90,e8,e6,58, 
8d,3d,03,ad, 3e,03,85,62, 97ed 60,06,59,98,e1,26,59,38B, 
ad,3f,83,85,61,ad,44,03, 97e8 a5,57,8e9,08,85,57,b®,d6, 
85,64,ad,45,03,85,63,20, 97Ff0 c6,58,60,46,59,90,cf,66, 
00,90,25,64,8d,3e,03,a5, 9378 59,18,a5,57,69,08,85,57, 
63,8d,3f,03,ad,40,03,8B5, 9820 S8,c4,e6,58,690,00,2e0,4D0, 
62,ad,41,83,85,61,ad,46, 9888 e1l,88,e2,c0,e3,80,e5,42, 
03,85,64,ad,47,03,85,63, 98128 e6,80,e7,c0,e8,00,ea,"42, 
20,20,90,a5,64,8d,40,03, 9818 eb,88,ec,c®d,ed,88,ef,“4ß, 
a5,63,8d,41,03,68,a8,68, 9828 £f0,80,F1,c0,f2,00,f4,40, 
aa,68,60,48,Ba,48,98,4B, 9828 £f5,80,f6,c0,f7,00,F3,42, 
ad,42,03,85,62,ad,43,03, 9838 fa,80,fb,c8,fc,00,fe,80, 
85,61,ad,44,03,85,64,ad, 9838 490,20,10,08,04,02,01,ad, 
45,03,85,63,20,78,91,a5, 9849 97,07,37,81,37,23,97,06, 
63,8d,48,03,35,64,8d,49, 9848 97,008,a0,498,31,80,a2,c2, 
03,ad,42,03,85,62,ad,43, 9850 a3,00,a5,40,46,80,a7,c®, 
03,85,61,ad,48,03,85,64, 9858 aB,00,aa,48,ab,80,ac,c®, 
ad,41,03,85,63,20,78,31, 9860 ad,00,af,40,b8,80,b1,c®, 
a5,63,8d,43,803,a5,64,8d, 9868 b2,00,b4,40,b5,80,b6,c2, 
4b,03,ad,3c,03,85,62,ad, 38708 b7,800,b9,40,ba,88,bb,c®, 
3d,03,85,61,2d,48,03,85, 9878 bc,88,be,48,83,48,98,4B, 
63,ad,49,23,85,64,20,20, 9889 ad,cd,38,d0,24,30,05,8c, 
S®,ad,4a,83,85,69,ad,4b, 9888 88,96,c8,8c,8f,96,a0,3S8, 
03,85,63,20,b7,90,35,62, 9839 8c,89,36,8c,980,36,a9,35, 
8d,3c,23,45,61,84,3d,03, 9898 8d,080,dd,ad,cd,98,49,Ff, 
ad,3e,03,85,62,ad,3f,83, 9830 8d,cd,98,68,38,68,aa,568, 
85,61,ad,48,03,85,63,ad, 9838 68,28,49,8c,88,96,c8,8c, 
49,083,85,64,20,20,90,ad, 98b8 Bf,36,30,98,8c,89,96,8c, 
4a,03,85,69,ad,4b,83,85, 98b8 98,36,a9,94,8d,00,dd,ad, 
63,20,b7,30,35,61,8d,3F, 98c® cd,38,49,ff,8d,cd,98,68B, 
03,35,62,8d,3e,03,68,38, 98c8 38,68,a2,68,60,00,a9,54, 
68,33,68,60,36,5c,8a,23, 98d® 8d4,28,dd,a9,3b,8d,11,d®, 
07,85,57,Ba,4a,29,7c,4a, 9848 a9,38,8d4,18,d0,60,a9,97, 
8a8,35,53,29,f8,85,57,79, 9Be2 8d,20,dd,a9,9b,8d,11,d2, 
49,98,85,57,a5,5b,79,4a, 98e8 a9,15,8d,18,d0,60,a2,1e, 
98,85,58,35,53,29,07,38, 9BF® ad,cd,98,f0,03,380,ed,2c, 
b9,37,98,85,59,60,78,a9. 98F8 a8,a8,84,61,30,00,84,60, 
35,85,01,20,00,35,02,d0, 3999 98,91,60,c8,d8,fb,e6,61, 
0b,85,59,49,£ff,31,57,31, 9398 ca,18,fF6,30,40,91,69,8B8B, 
57,4c,ba,S5,b1,57,05,59, 9918 18,fb,ad,4f,99,29,0F,85, 
91,57,39,37,85,01,ea,6®, 9918 60,ad,4e,99,0a3,0a,0a,Ba, 
20,20,c0,ad,a8,cb,c9,®1, 9928 05,60,a8,ad,cd,98,d0,13, 
d®,03,4c,a2,937,38,35,5e, 9928 S8,30,00,99,08,cc,99,20, 
e5,53,85,60,a5,5f,e5,5b, 9930 cd,99,828,ce,39,00,cf,cB, 
85,61,b90,10,39,01,e5,60, 9938 d®,f1,60,38,30,00,99,00, 
85,60,a9,00,e5,61,85,61, 9940 2 8c,99,00,8d4,99,00,8e,39, 
a2,04,d0,0b,d0,07,a5,62, 9948 00,8Ff,c8,d8,F1,60,01,00, 
d®ß,03,a2,08,2c,a2,06,bd, 9958 48,83,48,98,48,35,45,85, 
3f,98,84,95,97,bd,40,S8, 3958 14,a5,46,85,15,30,94,b1l, 
84,96,97,38,a5,55,8e5,5c. 9969 14,d0,80d,c8,b1,14,c9,80, 
85,63,b9,0a,49,ff,85,63, 9968 d®,06,68,38,68,33,68,60, 
e6,63,a2,00,f0,07,d0,03, 99370 a0,00,b1,14,18,6d,3c,23, 
a2,08,2c,a2,82,bd,3f,98, 9978 85,5e,c8,b1,14,6d,3d,03, 
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9982 
9988 
9999 
9998 
99a9 
99a8 
99b2 
99b8 
99c0 
99c8 
9942 
9948 
99e2 
9988 
99Ff2 
39f8 
9308 
9a88 
9ald 
9a1B 
9a22 
9a28B 
9a39 
9a38 
9a428 
9a48 
9359 
9358 
9a68 
9368 
9378 
9a78 
9a89 
9a88 
9a390 
9a98 
Saad 
9aaßB 
9ab® 
9ab8 
Sacd 
9ac8 
9add 
9ad8 
9aed 
Sae8B 
Safd 
gaf8 
9b22 
9b88 
Sb1® 
9b18 
9b20 
9b28 
9b38 
9b38 
9b40 
9b48 
9b50 
9b58 
9b562 
9b68 
9b78 
9b78 
9bB0 
9b88 
9b38 
9b398 
9bad 
Sba8B 
9bb® 
Sbb8 
Sbcd 
Sbc8 
9bd2 
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3059 
3068 
3078 
398828 
30908 
3198 
3118 
3128 
3138 
3148 
3150 
3168 
3178 
3188 
3198 
3208 
3218 
3228 
3238 
3248 
3258 
3268 
3278 
3288 
3298 
3380 
3318 
3320 
3338 
3348 
3350 
3368 
3370 
3380 
3390 
3498 
3418 
34208 
34390 
3440 
3450 
3460 
3478 
3488 
3490 
35008 
3512 
35208 
3539 
3542 
3558 
3568 
3578 
3589 
3590 
3698 
3612 
36208 
3639 
3640 
3650 
3668 
3678 
3680 
3692 
3790 
3718 
37228 
3738 
3740 
3750 
3768 
3778 
3788 
3798 


85,5f,c8,b1,14,18,6d,3e, 
03,85,55,c8,b1,14,69,020, 
85,56,c8,b1,14,18,6d,3c, 
03,85,5a,c8,b1,14,6d,3d, 
03,85,5b,c8,b1,14,1B,6d, 
3e,83,85,5c,c8,b1,14,68, 
00,85,5d,20,c0,96,a5,14, 
18,69,04,85,14,a5,15,69, 
00,85,15,4c,5d,99,4B,Ba, 
48,98,48,a5,45,8d,2d,9a, 
85,46,8d,de,9a,a0,00,b1, 
45,aa,e6,45,d0,02,e6,46, 
20,50,99,35,14,18,69,08, 
85,45,a5,15,69,00,85,46, 
ca,d®d,ed,ad,®d,9a3,a6,45, 
85,45,Be,2d,9a,ad,®e,9a, 
a6,46,85,45,Be,de,9a,568, 
a8,68,aa,68,60,92,30,4B, 
Ba,4B,98,48,35,45,8d,52, 
Sb,35,46,84,53,9b,a5,47, 
85,f7,a5,48,85,fB,a9,4c, 
38,e9,06,85,6f,a9,9b,e9, 
20,85,70,18,a0,00,b1,F7, 
aa,e6b,f7,d®,02,e6,f8,a, 
25,168,51,£9.71,6F,91.,6£- 
c8,51,F9,71,6f,91,6£,c8, 
c8,20c,d0,ed,a9,20,8d,54, 
Sb,a80,07,b1,6f,f0®,2b,88, 
b1,6f,30,13,c8,8d,55,9b, 
b1,6f,38,e9,01,d0,07,ad, 
S5S5,3b,c9,68,30,14,88,38, 
b1,6f,e9,68,91,6F,c8,bl, 
6f,e3,01,91,6f,a9,201,Bd, 
54,3b,c8,c8,c2,0d,d@,cb, 
ad,54,9b,d0,bF,a0,05,b1, 
£f7,99,3c,03,88,10,F8,a2, 
808,b1,f9,99,42,03,c8,c®, 
06,d0,F6,20,ef,94,b1l,6f, 
99,3c,03,c8,c0,0c,d0,f6, 
2e0,da,92,b1,£f9,99,36,03, 
c8,c0,12,d0,f6,20,5d,35, 
b1,£9,99,39,23,c8,c0,18, 
d®d,f6,20,ef,34,b1,F9,39, 
2a,03,c8,c0,1c,d0,F6,2®, 
cb,935,a0,00,3d,3c,03,31, 
45,c8,ad,3d,03,91,45,c8, 
ad,3e,03,91,45,0B,ad,3f, 
03,931,45,c8,18,a5,45,69, 
04,85,45,a9,00,65,46,85, 
46,85,f7,18,69,06,85,£7, 
a9,00,65,FB,85,fB,18,ca, 
f0,03,40,95,93,30,00.39, 
00,31,45,c8,39,80,91,45, 
c8,a9,008,91,45,c8,39,80, 
91,45,ad,52,9b,a6,45,Be, 
52,9b,85,45,ad,53,9b,a6, 
46,82,53,9b,85,46,68,a8, 
68,aa,68,60,46,00,00,0®0, 
00,00,8e2e,30,00,68,4B,Ba, 
48,98,48,a0,05,b9,6a,9c, 
99,4c,9b,88,10,f7,68,a8, 
68,aa,68,60,48,83,48,S8, 
48,a5,45,8d,71,9c,a5,46, 
8d,72,9c,80,806,b1,F9,18, 
79,0%,90,99,6%,96 .CB,b1, 
E3,78, 04,90,99,54,90,c8', 
c8,8c,d®,e9,a9,00,8d,5%, 
9b,a80,07,b9,64,9c,£0,31, 
88,b9,64,9c,38,14,c8,Bd, 
S5,9b,b9,64,9.,38,e9,01, 
dß,07,ad,55,9b,c9,6B,3®, 
18,88,38,69,64,9c,e9,68, 
99,64,9c,c8,b9,64,9c,e$, 
01,99,64,9c,a9,01,8d4,54, 
5b,c8,c8,c0,0d,d8,c4,ad, 
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54,9b,d2,b8,a0,20,18,b1, 
£9,99,63,90,;,b1,71.,79,63, 
96; 91,£9,08,b1,£9,89,63, 
936,.51.,71, 79,83, 96.,91;,£9, 
c8,c0,06,d0,e1,b1,71,aa, 
a5,71,18,69,07,85,47,a5, 
72,69,00,85,48,30,00,8a, 
91,45,8e6,45,d0,02,e6,46, 
20,56,9b,290,0Ff,94,20,56, 
Sb,35,f7,85,47,a0,00,a5, 
£f8,85,48,ad,52,9b,18,69, 
04,85,45,ad,53,9b,69, 00, 
85,46,ca,d®,db,a0,00,b9, 
63,9c.,91,f9,c8,c0,26,d®, 
£f6,ad,71,9c,36,45,85,45, 
Be,71,9c,ad, 72,9c,a6,46, 
85,46,8e,72,90,68,a8,68B, 
aa,68,60,00,002,20,00,00, 
00,20,46,00,00,20,00,00, 
00,32,30,48,Ba,48,98,4B, 
a0,05,49,02,99,63,9c,88, 
10,f8,68,a8,68,aa,68,560, 
28,ce,98,a9,01,8d,4e,399, 
39,00,8d,4f,99,20,ee,38B, 
20,7b,98,28,e2e,98,39,20, 
B5,71,a9,30,85,72,a9,45, 
85,f9,a9,30,85,fa,a9,61, 
85,45,a9,30,85,46,20,6c, 
9b,39,64,8d,3e,03,a9,a0, 
8d,3c,83,a9,00,8d,3d,23, 
28,c6,99,290,7b,98,a9,01, 
8d,07,9e,39,00,20,05,39, 
£d,34,993,£7,9d,88,108,£7, 
280,73,9c,58,35,cb,c9,"42, 
£f8,2c,c9,38,d80,08,29,01, 
8d,07,9e,4c,16,9d4,c9, 3b, 
d®,208,a9,02,84,07,9e,“4c, 
16,9d4,c9,88,d0,08,39,03, 
8d,27,9e,4c,16,9d,c9,3c, 
dd,04,20,de,98,60,a9,020, 
a0,03,99,03,9e,88,10,Fa, 
a9,01,a0,00,2c,80,dc,d2®, 
08,39,05,8d,03,9e,a9,01, 
c8,8a,2c,00,dc,d0,0d,a9, 
ff,84,04,9e,a9,fb,8d, 03, 
Se,a93,02,c8,8a,2c,20,dc, 
d®d,0d,a9,ff,84,06,9e,a9, 
£fb,8d,05,9e,39,24,c8,®a, 
2c,880,dc,d8,08,39,05.8d, 
05,98,39,28,c8,2a,2c,00, 
dce,d®,24,8d,03,9e,c9,fb, 
d®,08,a9,f6,8d,23,9e,“4c, 
7d,9d,de,83,9e,ad,86,Se, 
10,09,39,f6,8d,25,9e,c8, 
4c,8F,3d,0e,805,98e,c8,88, 
18,03,4c,e3,90,20,73,9c, 
ad,027,98,38,e9,01,18,2a, 
18,69,12,38,ad,25,9e, 79, 
e5,9d,99,e5,94,91,£9,c8, 
ad,806,9e,79,e5,9d4,99,85, 
9d4,91,F9,88,98,38,e9,0c, 
8a8,18,ad,03,9e,79,£7,9d, 
99,£7,9d4,91,f9,c8,ad, 24, 
38,19,27,84,399,£7,84,91; 
£9,20,6c,9b,39,64,8d,3e, 
03,39,a0,84,3c,03,a9,00, 
8d4,3d,83,208,c6,99,20,7b, 
SB,20,ee,38,4c,e3,9c,08, 
00,05,28,28,00,45,20,00, 
00,00,20,20,020,00,20,02, 
60,39,21,8d4,52,9F,ad,9f, 
Sc,85,71,ad,a3,9c0,85,72, 
ad,a7,9c,85,f9,ad,ab,Sc, 
85,fa,ad,af,9c,85,45,ad, 
b3,90,85,46,30,12,b9,e5, 
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94,38;f9,73,9E,856;84,c8; 4958 data 8d,3e,03,20,c6,99,4c,e3, 
b9,e5,94,£9,79,9Ff,85,63, 49608 data 9c,a0,00,a9,00,39,£7,9d, 
88,ad,52,9f,85,62,29,00, 4970 data 99,8b,9f,c8,c0,0c,d0,f5, 
85,61,20,28,98,ad,51,3f, 4980 data 40,d5,9f,00,00,00,00,00, 
85,563,a9,20,85,69,98,48, 4990 data 080,00,20,00,00,00,00,ad, 
20,b6b7,90,68,88,85,62,18, 5008 data 3f,9c,85,71,ad,a3.9c,85, 
23,73,9E,92,79368785;,61; SP1® data 72,ad,a7,9c,85,f9,ad,ab, 
73,79, 9£,91,6935605€2,18} 5022 data 9c,85,fa,ad,af,9c,85,45, 
d®,bc,a8,06,69,f7,9d,38, 5038 data ad,b3,9c,85,46,20,6c,9b, 
£9,8b,9f,85,64,c8,b9,f7, 5048 data 60,30,00,78,b9,20,00,99, 
94,F9,8b,9f,85,63,ad,52, 5058 data 280,04,c8,d0,F7,58,60,aß, 
9f,85,62,a9,00,85,61,20, 5062 data 282,78,69,00,04,99,00,08, 
00,50,88,ad,51,9F,85,5a, 5078 data c8,d0,f7,58,60,ad,53,3f, 
a9,00,85,69,98,48,20,b7, 5082 data Bd,af,9c,ad,54,9Ff,8d,b3, 
90,68,a8,a5,62,18,79,Bb, 5838 data 9c,20,73,9c,4c,88,9c,24, 
9f,51,f9,c8,a5,61,79,Bb, 5108 data 48,00,20,00,020,00,00,00, 
Sf,sS1,fFf9,c8,c8,8c,d®,bc, 

20,73,9c,28,6c,9b,ad, 71, 

9c,85,45,ad, 72,9c,85,46, 60008 for a-36864 to 40936 step 
ee,52,9f,ae,51,9f,eß,ec, 8:5=-8:c=Bd:for b=® to 7: 
Ss2,9f,f8,03,4c,2c,9e,a5, gosub 690408 
45,8d,af,9c,a5,46,8d,b3, 60018 s=s+th+l-c:c=s>255: s=-255-s 
9Sc,20,28,69,F7,9d4,99,8b, and 255:poke atb,h+tl:next 
9f,c8,c®,08c0,d8,f5,690,20, b:gosub 690842 
b93,9f,ad,53,9F,85,45,ad, 60929 F$="pruefsumme ok”:if s<> 
54,9f,85,46,20,ce,38,a9, h+l then fS="[rvs] 
01,Bd,4e,99,a9,00,8d,“4f, pruefsummenfehler”:f=f+1 
99,280,ee,98,28,7b,98,20, 600830 gosub 680898:next a:print 
ee,38,20,7b,98,ae,51,9f, £Cdown]”f”fehler”:end 
39,a80,84,3c,03,39,00,8d, 60040 read h$:gosub 698059:h=-1* 
3d,203,a9,64,8d,3e,03,8a, 16:h$=-mid$ Ch$,2) 
48,20,c6,99,ad,0d4,93,85, 600598 l-asc Ch$+”x”)-4B:if 1<9Q 
45,ad,0e,93,85,46,20,7b, or 1>22 then 60088 
98,20,ee,98,68,aa,ca,d®, 69862 if 1<128 then return 
d’,ad,af,9c,85,45,ad,b3, 60078 1=-1-7:if 1>9 then return 
5c,85,46,20,07,9f,a2,0®, 6008828 fF$="[rvsleingabefehler”:1- 
60,46,1a,61,30,20,ce,SB, O:f=f+1 
2e0,ee,98,20,7b,38,20,ee, 60838 print "zeile” peek (64)* 
S8,20,97,9f,39,a0,8d,3c, 256+peek (63)f$:return 
03,39,20,8d,3d,03,a9,64, 
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48,Ba,48,98,48,a5,5f,45, 85,69,20,b7,90,a5,61,85, 
5b,30,15,38,a5,5e,e5,5a, 63,35,62,85,64,a5,55,85, 
a5,5f,e5,5b,90,05,a9,01, 62,85,56,85,61,20,78,51, 
48,29700;539,FE,4c,;293,c®, ad,33,c4,85,61,ad,3b,c4, 
a5,5f,2a,a9,ff,b0,02,a9, 85,62,20,68,91,35,63,85, 
01,ea,c9,ff,d®,20,a5,5e, 56,35,64,85,55,ad,32,cH, 
a6,53,85,5a3,86,5e8,35,5f, 85,5e,ad,33,c4H,85,5f,ea, 
a6,5b,86,5f,85,5b,a5,55, a5,5b,4d,37,c4,390,17,38, 
a6,5c,86,55,85,5c0,35,56, a35,53,ed,36,c4,a5,5b,ed, 
36,5d,86,56,85,5d,ea,a5, 37,c4,90,05,a9,01,4c,57, 
5b,44, 337) c04,30,17,38,85, c1,89,fE,40,57,01,85,5b, 
S5a,ed,32,c4,85,5b,ed,33, Ba,a9,ff,b®,02,a9,01,ea, 
c4,90,05,29,01,4c,76,c®, c9,01,d0,03,4c,18,c2,ea, 
a9,ff,40,76,00,35,5b,2a, a5,5£,44,37,0%,392,17,38; 
a9,ff,b0,02,39,01,ea,cS, a5,5e,ed,36,c4,a5,5f,ed, 
201,d0,03,4c,27,c4,ea,a5, 37,c4,90,05,89,01,4c,87, 
Sf ,Nd.,33,04,39517,38,85; 01,89 ,P8.,46-87,0:.,85;S5F 
Se,ed,32,c4,a5,5f,ed,33, 2Ba,a9,ff,b0,02,a9,01,ea, 
c4,930,05,a9,01,4c,36,c2, >9,FF., 09,03; 8c,27,04,85; 
a9,ff,4c,a6,c0,a5,5f,2a, 55,85,62,a5,56,85,61,a5, 
a9,ff,b90,22,a9,01,ea,c3, 5c,85,64,a5,5d,85,63,2®, 
01,£f0,803,4c,2f,c1,a5,5c, 78,91,a5,63,8d,3a,c4,a5, 
85,62,85,5d,85,61,a5,55, 64,8d,3b,c4,ad,36,c4,85, 
85,64,a5,56,85,63,20,78, 62,8d,37,c4,85,61,a5,5e, 
91,a5,63,8d,3a,c4,a5,64, 85,64,a5,5f,85,63,20,78, 
8d,3b,cH4,ad,32,c4,85,6%, 91,ad,3a,c4,85,61,ad,3b, 
ad,33,c4,85,63,a5,5a,85, c4,85,62,20,00,90,38,a5, 
62,85,5b,85,61,20,78,31, 5a,e5S,5e,85,6a,35,5b,e5, 
ad,3a,c4,85,61,ad,3b,c4, 5f,85,69,20,b7,90,a5,61, 
85,62,20,00,90,38,a5,5a, 85,63,a5,62,85,64,a5,5c, 
e5,58e,85,6a,35,5b,e5S,5f, 85,62,a5,54,85,61,20,78, 
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ci1f® 
c1f8 
c2008 
c208 
c2108 
c218 
c2208 
c22B 
c230 
c238 
c240 
c24B 
c250® 
c258 
c2608 
c268 
c2708 
c278 
c2828 
c288 
c298 
c298 
c2ad 
c2a8 
c2b® 
c2b8B 
c2c® 
c2cB 


91,ad,33,c4,85,61,ad,3b, 
c4,85,62,20,6a,91,85,63, 
85,5d,a5,64,85,5c,ad, 36, 
c4,85,53,3d,37,c4,85,5b, 
ea,a5,56,45,5d,30,15,38B, 
a5,55,e5,5c,a5,56,e5,5d, 
S0,05,39,01,4c,35,c02,a9, 
ff,4c,35,c2,a5,56,2a,a9, 
ff,b0,02,a9,01,ea,c9,ff, 
d®,20,35,5e,36,5a,86,5e, 
85,5a,35,5f,a6,5b,85,5b, 
86,5f,35,55,36,5c,86,55, 
85,5c,a5,56,a6,5d,86,56, 
85,5d,ea,a5,56,4d,35,c4, 
30,17,38,35,55,ed,34,c4, 
a5,56,ed,35,c4,90,05,a9, 
01,4c,82,c2,a9,Fff,4c,82, 
c2,35,56,2a,a9,ff,b9,22, 
a9,01,ea,c9,ff,d®,03,4c, 
3b,c3,ea,a5,5d,4d,35,c4, 
32,17,38,35,5c,ed,34,c4, 
a5,5d,ed,35,c4,990,05,a9, 
01,4c,b2,c2,a9;ff,4c,be, 
c2,85,5d,2a,a9,ff,b0,22, 
a9,21,ea,c9,ff,f8,03,4c, 
27,c4,a5,5a,85,62,35,5b, 
85,61,85,5e,85,64,a5,5f, 
85,63,20,78,91,a5,63,8d, 


c4,35,56,ed,39,c4,90,05, 
a9,01,4c,93,03,a9,ff,4c, 
93,c3,a5,56,2a,a9,Fff,b®, 
02,a9,01,ea,c9,ff,d0,03, 
4c,27,c4,a5,5e,85,62,a85, 
Sf,85,61,35,53,85,64,a5, 
5b,85,63,20,78,91,a5,63, 
8d,3a,c4,a5,64,8d,3b,c4, 
ad,38,c4,85,62,ad,39,c4, 
85,61,35,55,85,64,a5,56, 
85,63,20,78,91,ad,3a,c4, 
85,61,ad,3b,c4,85,62,20, 
00,30,38,a5,5c,e5,55,85, 
6a,a5,5d,e5,56,85,69,20, 
b7,98,35,61,85,63,a5,62, 
85,64,a5,53,85,62,a5,5b, 
85,61,20,78,91,ad,3a,c4, 
85,61,ad,3b,c4,85,62,20, 
6a4,91,a5,63,85,5b,a5,64, 
85,52,2d,38,c4,85,5c,ad, 
39,c4,85,5d,a9,00,8d,aß, 
cb,68,38,68,a4,6B,60,a9, 
01,8d,20,cb,68,a8,68,aa, 
68,60,3f,01,c7,00,00,00, 
02,00,00,008,200,00,00,00, 


c2d® 3a,c4,a5,64,8d,3b,c4H,ad, for a=-49152 to 59232 step 


c2dB 
c2ed 
c2eB 
c2f® 
c2fB 
c300 
c388 
c318 
c318 
c320 
c328 
c330 
c338 
c340 
c34B 
c3508 
c358 
c368 
c368 
c37® 


Listi 


1888 
10928 
1180 
1118 


ng 4: Muß mit dem Titel „clip.obj" a 


34,c4,85,64,ad,35,c4,85, 
63,a5,5c,85,62,a5,5d,85, 
61,20,78,91,ad,3a,c4,85, 
61,ad,3b,c4,85,62,20,00, 
90,38,35,50,e5,55,85,6a, 
a5,5d,e5,56,85,69,20,b7, 
90,a5,61,85,63,a5,62,85, 
64,a5,58e,85,62,a5,5f,85, 
61,20,78,91,ad,3a,c4,85, 
61,ad,3b,c4,85,62,20,6a, 
91,a5,63,85,5f,a5,64,85, 
Se,ad,34,c4,85,55,ad,35, 
c4,85,56,ea,a5,5d,4d,39, 
c4,30,17,38,a5,5c,ed,38, 
c4H,a5,5d,ed,39,c4,90,05, 
a9,21,4c0,63,03,a9,ff,4c, 
63,c3,85,5d,2a,a9,ff,b®, 
02,a9,01,ea,c9,01,d0,03, 
4c,ic,cH#t,ea,a5,56,4d,39, 
c4,30,17,38,a5,55,ed,38, 


Auch wenn 
es uns nicht 
so ergeht 
wie diesem 
Kollegen: 


ichert werden 


Die Redaktion 


8:5=9:c=B:for b=® to 7: 
gosub 60048 


s=s+h+l-c:c*=s>255: s=255-s 
and 255:poke atb,h+l:next 


b:gosub 690408 
£f$=-"pruefsumme ok”:if s<> 
h+l then £$="[rvs] 
pruefsummenfehler”:f=fF+1 
gosub 68898:next a:print 
£Cdown]”f”Ffehler”:end 
read h$:gosub 60059: h=1* 
16:h$=-mid$ Ch$,2) 

l=sasc Ch$+”"x”)-48:if 1<9 
or 1>22 then 600828 

if 1<18 then return 
l=-1-7:if 1>9 then return 


f$=-"[rvsleingabefehler”:1- 


o:f=-f+1 
print ”zeile” peek (64)* 
256+peek (63)Ff$:return 


freut sich über Ihren Leserbrief! 
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Praxis Listing 


Heiß: Eprom-Modulgenerator 


System: C64, Floppy, 
EPROMmer 

Typ: Anwendung 

Sprache: Basic/ASM 


Nach dem Start von „EPROM" er- 
scheint auf dem Bildschirm die 
erste Eingabemaske. Sie fordert 
auf, die Größe des EPROMs einzu- 
geben: 

1) 4K EPROM/Modul für 1 Pro- 
gramm mit Autostart und maxi- 
mal 15 Blocks Größe. 

2) 8K EPROM/Modul für bis zu 4 
Programme mit Autostart und 
maximal 29 Blocks Größe. 

3) 16K EPROM/Modul für 1 Pro- 
gramm mit Autostart und maxi- 
mal 60 Blocks Größe. 

4) 8K EPROM/Betriebssystem zum 
Austesten. 

In den ersten 3 Unterprogrammen 

erwartet EPROM den Namen des 

gewünschten Programmes auf 

Diskette. Wenn man die Dollarta- 

ste drückt, erscheint das Inhalts- 

verzeichnis. Bei Maschinenpro- 
grammen muß die Startadresse 
angegeben werden. Soll das Mo- 
dul direkt starten nachdem der 


Listing 1: Damit wird EPROM gestartet 


rem <co> p. sckart 
poke 646, peek (53281) 


print "Colr)Jload” chr$ (34)”eprom m” 


chr$ (34)”",8,1"” 
print :print :print :print 


print "load” chr$ (34)”eprom b” 


[EC ze VA > bag 
print :print 
print "run" 


:print 


:print 


poke 631,19:poke 632,13:poke 633,13: 


poke 634,13:poke 198,“4:end 


poke 16535,16:poke 16537,128 


C3spaces]* 


[2spaces)*[2spaces)*[2spaces)* 
C2spaces]*[2spaces]** ** 


10 sys 16599:sys 17168:poke 17226,126 
20 poke 556,96:poke 828,9:poke 829,08 
30 poke 53280,8:poke 53281,8:poke 646,1: 


48 print "[clr, 7spaces]***[2spaces]*** 
[3spaces)***[4spaces]**[L3spaces]* 


58 print "[6spaces)*[5spaces)*[2spaces]* 


68 print "[6spaces)***[L3spaces]*** 
C3spaces]***[L 3spaces]*[2spaces)* 


Um Programme auf 
EPROMSs zu brennen 
muß man entweder 
Maschinensprache be- 
herrschen oder aber 
das nachfolgende 
Listing eingeben. 


Computer eingeschaltet wurde, so 
beantwortet man die nächste Fra- 
ge mit JA. Ansonsten NEIN einge- 
ben. Danach gibt EPROM die 

Möglichkeit, das neue Programm 

zu testen, abzuspeichern oder ins 

Hauptmenü zurückzukehren. 

Unterprogramm 4 bietet weitere 

Funktionen: 

1) Bytes ändern = Neue Werte in 
den Speicher POKEn (zum Bei- 
spiel Randfarbe ändern). 

2) Neues Betriebssystem laden. 

3) Testen 

4) Directory 

5) Neues Betriebssystem spei- 
chern. 

EPROM besteht aus 3 Listings: 

Starter, EPROM Basic- und 


78 print "[6spaces)*[5Sspaces]*[5spaces])** 2012 
[4spaces)*[2spaces)*[2spaces)* 
[3spaces]* 
88 print ”[7spaces]***[2spaces]*[Sspaces) 2342 
* “[4spaces]**[ 3spaces]*[3spaces)* 
chrs 98 print 153 
108 print "[40cbm +] 5321 
118 print "C[yel,13spaces]by peter eckart”: 1989 
print 
120 print "[wht,40cbm +) 5341 
138 print "[2spaces,rvs) 1 [off ,2spaces)- 4347 
?r32l2spaces](C 4k-eprom)#modul#"”: 
print 
148 print "[2spaces,rvs) 2 [off ,2spaces)- 4168 
FrE4l2spaces)(C Bk-eprom)#modul#”: 
print 
159 print "[C2spaces,rvs) 3 [off ,2spaces)- 4603 
Tri2B C15K-eprom)#modul#”:print 
3094 168 print "[2spaces,rvs} 4 [off ,2spaces)- 4495 
2537 ?Tr6E4l2spaces]( Bk- 
46564 eprom)#betr .system#":print 
178 print "[2spaces,rvs] 5 [off ‚2spaces)*- 4239 
2151 .-m.-—...... direktory .....u.0%°.orint 
188 print "[2spaces,rvs] 6 [off ,‚2spaces)- 3989 
„......»[(Pspaces]le n d el2spaces]) 
2072 .......ase".nrint 
198 get „Jn$:if Jn$=-"" then 190 ı412 
208 if jJn$="1"” then 298 1205 
2257 218 if Jn$="2” then 430 1249 
2208 if Jn$="3” then 880 1341 


WU LERU RE RP NN TA TER ITBBEFINE 


C2spaces)* * ® 


EPROM _Maschinenspracheteil. 
Die ersten beiden Routinen wer- 
den mit dem Korrektor eingege- 
ben. Der EPROM Basicteil muß 
den Namen „EPROM B" tragen. 
Der Maschinenspracheteil muß 
„EPROM M" heißen. Er ist als 
kombinierter Hex-Dump-Basic-La- 
der abgedruckt. Wie man mit die- 
ser Art von Listings umgeht, steht 
auf Seite 82. Wird das Programm 
als Basic-Lader eingegeben, so 
muß der Lader vor dem Start ge- 
speichert werden. Nach RUN wer- 
den dann die Daten in den Spei- 
cher gepoket. Das fertige Maschi- 
nenprogramm kann mit 

POKE 43, 0: POKE 44,64 

POKE 45, 0: POKE 46,73 
SAVE,„name",8 

auf Diskette abgespeichert wer- 
den. Wird es als Hexdump einge- 
geben, so wird der Checker be- 
nutzt. Als Startadresse ist 4000 an- 
zugeben. Der Start erfolgt mit dem 
Starter-Listing. Sollte ein „File not 
Found-Error" erscheinen, wurden 
die Programme nicht unter den 
angegebenen Namen abgespei- 
chert. 
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if Jn$="4” then 19020 

if jJn$="5” then 279 

if yJn$="6" then poke 32776, 00:sys 

64738 

goto 190 

print "[clr]”:sys 16640 

if peek (53280) then run 

rem 4k modul 

print "Lolr)":a$="## ?732 # 4k-modul 
HH” 

print tab(20-len (Ca$)/2)a$:print : 

print :print 

print "diskette mit prg bereit [rvs] 
J/n Loff)":print 

get jn$:if Jn$="" then 330 

if jn$="j” then 379 

if Jn$=-"n" then run 

goto 338 

poke 78,1:print "C[Cclr,2down]Jname des 
programm's” 

print "[21spaceslEEEEEEEEEEEEEEEE” 

print "start-adresse ?[shift-space]": 

print 

gosub 1650:gosub 17198:poke 17226,156 

poke 40275,peek (16535):poke 40277, 

peek (16537) 

if pesek (53280) then 2518 

rem 8k modul 

print "[clr]":a$=-"## ??64 # Bk-modul 
HH” 

print tab(20-len (a$)/2)a$:print : 
print :print 

print "wieviel programme? (hoechstzahl 
4)":print 

poke 204,8:get jn$:if Jn$="" then 470 
J=val Cjn$):if J<1 or j>4 then 470 

if peek (207)<>8 then 490 

poke 284,1:print jn$;:print ” prg”: 
print 

print "diskette mit prg bereit [rvs] 
j3/n Coff)":print 

get In$:if Jn$="" then 520 

if jn$="}" then 568 

if jJn$=-"n" then run 

goto 5228 

poke 78,1:print "[Cclr,2downJname des 
programm's” 

print "[2lspacseslEEEEEEEEEEEEEEEE”" 
print "start-adresse ?[shift-space)”: 
print 

gosub 1658:gosub 1710:poke 17226,155 
poke 49275,peek (16535):poke 49277, 
peek (16537) 

if peek (B29)-141 then poke 40559, peek 
(40270):poke 40560, peek (40271) 

if peek (829)-141 then poke 40270,64: 
poke 40271,3:poke 829,0 

if peek (40258)-8 then poke 40559, 134: 
poke 40560,227 

if J?1 then print :print "Chome , 2down] 
name des 2.,prg[25spaces]" 

if j>1 then poke 78,2:gosub 1650: gosub 
1718:print :poke 17226,186 

poke 40302,peek (16535):poke 49304, 
peek (15537) 

if peek (B29)-=141 then poke 40576, peek 
(402937):poke 40577, pesk (40238) 

if psek (829)-141 then poke 40297,81: 
poke 40298,3:poke 829,0 

if peek (40285)-8 then poke 40576, 134: 
poke 40577,227 

if J>2 then print :print ’Chome , 2down] 
name des 3,prg[l25spaces]" 

if J>2 then poke 78,3:gosub 1650: gosub 
1718:print :poke 17226,216 

poke 40329, peek (16535):poke 40331, 
peek (16537) 

if peek (829)=141 then poke 40593, peek 
(40324):poke 49594, peek (40325) 

if peek (829)=141 then poke 40324,98: 

poke 48325,3:poke 829,0 

if peek (40312)-8 then poke 40593, 134: 

poke 40594,227 

if J>3 then print :print "Chome , 2down) 

name des 4,prg[l25spaces)” 

if J?3 then poke 78,4: gosub 1658: gosub 
1718: print 

if peek (829)=-141 then poke 40612, peek 
(48351):poke 48611,peek (40352) 
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BENUDP ZESRRET HIN PATER TEL AT 


190608 
1078 
1080 
1098 
1100 


1118 
1128 
1130 
1149 
1158 
1168 
1178 
1188 
1199 


12008 
1210 
1220 


1230 


1240 
1250 
1268 
1270 
12808 
1290 


1300 
1318 
13208 
1338 
1348 
1358 


1368 
1378 


1388 


if peek (829)-141 then poke 40351,115: 

poke 49352,3:poke 829,8 

if peek (40339)-B then poke 40610,134: 

poke 408611,227 

print "bitte namen fuer copyrigth 
angeben” :print 

print "eprom-modul by ”; 

sys 17056 

if )J=1 then poke 40856,0:poke 40220, 

eug 

if jJ=2 then poke 40886,9:poke 40227, 

242 

if J=-3 then poke 409156,8:poke 40234, 

235 

if peek (53280) then 1830 

rem 8k modul 

print "C[Colr]":as="## ?T?128 # 16k-modul 
HH” 

print tab(20-len (a$)/2)a$:print : 
print :print 

print "diskette mit prg bereit [rvs) 
3/n Coff)”:print :sys 18329 

get Jn$:if Jn$="" then 320 

if jn$="j" then 3960 

if Jn$="n" then run 

goto 928 

poke 78,1:print "[Cclr,2downJname des 
programm’s” 

print "[21spaces)EEEEEEEEEEEEEEEE”" 
print "start-adresse ?[shift-space)": 
print 

poke 16493,131:poke 16537, 96: gosub 
1659 

poke 16493,117:poke 16537,128B 

if peek (53280) then 2198 

rem 8k betr .syst. c64 

print "[clr]":aS="## 7764 # 
betriebssystem ##":poke 40959, 255 
print tab(20-len (a$)/2)a$:print : 
print :print "C4down]” 

print "[12®spaces,rvs] 1 [off ‚2spaces)]- 
bytes aendern”:print 

print "[Cl®spaces,rvs] 2 [Coff ‚2spaces)- 
laden”: print 

print "C1®spaces,rvs] 3 [off ‚2spaces]- 
austesten":print 

print "[l®spaces,rvs]) 4 [off ‚2spaces]- 
direktory":print 

print "C18spaces,rvs] 5 [off,2spaces]- 
abspeichern”:print 

print "[1l®spaces,rvs] 6 [off ‚2spaces]- 
zurueck ins hauptmenue”:print 

get Jn$:if Jn$=""” then 1110 

if Jn$="1" then 11998 

if Jn$="2” then 1568 

if Jn$="3"” then 1330 

if Jn$="4"” then 1310 

if Jn$="5” then 16208 

if Jn$="6" then 1498 

goto 1118 s 
pS=-"":wS="":print "Cclr]":print tab(l 
20-len (a$)/2)a$:print :print :print " 
C4down]” 

print "adresse 58677 = zeichenfarbe” 
print "adresse 60633 - rahmenfarbe " 
print "adresse 60634 - 
bildschirmfarbe":print 

input "poke in adresse (dez)”;p$:print 


2$5*-p$:gosub 1450 
if z=1 then 19020 
input "[llspacesJwert (dez)”;w$:print 
z$-w$:gosub 1450 
if z=1 then 1028 
p-val (p$):p=-p-24576:w=val (wS):poke 


p,w 

if peek (53280) then 1198 

print "[Cclr]":sys 16649 

goto 1028 

pS="":wS="":print "Cclr]”:print tab( 

20-ien (Ca$)/2)a$:print :print :print 
print "dieser programmteil aendert 
einige":print 

print "speicherstellen und Fuehrt 
danach ":print 

print "einen reset aus.":print 

print "bitte speichern sie zur 
sicherheit":print 

print "vorher ihr geaendertes 


1398 


1400 


1410 
1420 
1438 
1449 
1450 
1460 


1478 
1488 
1498 


15908 
1510 
15208 
15308 
1549 
1558 
1568 
1578 


15898 
1598 


1608 
1618 
1620 


1638 
1640 
1650 
1660 
1679 


1689 


1699 


17008 
1710 
1720 
1730 


17498 
1758 


1768 


1779 
1780 
1790 


18908 


18128 
1820 
1838 
1840 
1850 
1860 


1870 
18898 
1830 
1990 
1919 


1920 


1930 


1940 
1950 
1968 
1978 
1988 
19998 


2000 
2018 
2020 


2030 
2040 


betr .syst. ab !":print :print 

print "[10spaces,rvs] 1 [off,2spaces)- 
abspeichern":print 

print "C10spaces,rvs] 2 [off,2spaces)- 
austesten”:print 

get jn$:if Jn$="" then 1410 

if Jn$="1” then 1028 

if )Jn$="2" then 1549 

goto 141® 

aa-len (z$):for ai to aa 

if mid$ (2$,a,1)<chr$ (48) or mid$ 
(z$,a,1)>chr$ (57) then z=i1:return 

next 

z=-d:return 

print "Cclr ,4downlbetriebssystem schon 
abgespeichert [rvs] J/n Loff]” 

get jn$:if Jn$="" then 1508 

if jJn$="n" then 1028 

if Jn$="jJ" then run 

goto 1588 

rem ** austesten ** 

sys 18592 

rem *152* laden **+*** 

poke 78,1:print "Cclr,2down]lname des 
programm’s” 

print "C21spacesJEEEEEEEEEEEEEEEE” 

poke 16493,131:poke 16535,08:gosub 
1658 

poke 16493,117:poke 16535,16 

goto 1028 

print ”"Cclr,1®down, 2spacesJmodul-name 
2», 

sys 17888 

if peek (53288) then 1029 

rem laden 

sys 16384: if st<>64 then poke B28,36 
if peek (828)-=36 then print "C[celr, 

2down]name des programm’s”:poke 198,8 
if peek (828)-36 then print ” 
C21spacesJEEEEEEEEEEEEEEEE” 

if peek (828)-36 then print "start- 

adresse ?[shift-space]"”:print :poke 

828,8:goto 15668 

return 

rem startadr. + namen vebergeben 

if peek (16639)<>8 then sys 16515 

if peek (828)-133 then sys 16904, 

49152:poke 828,0 

sys 17216:sys 17262 

print "Chome,2down]platine abschalten 
[rvs] jJ/n [Coff,15spaces]" 

get jn$:if Jn$<>"j)" and jn$<>"n" then 
1760 

if Jn$=-")j” then poke 829,141 

if peek (828)<>148 then return 

print ”"Cclr,2down,2spaces]lleider ist 
das prg zu lang” 

print :print :print tab(28)"[rvs) 
<space>Loff)]"” 

poke 198,8:wait 198,1:poke 198,0 

run 

rem modul saven, probelauf ?c&64 

poke 32776,4B 

DeINE IT ReIe] 

print tab(208-len (a$)/2)a$:print : 
print :print 

if peek (40258)-192 then poke 49246,16 
if peek (490285)-192 then paoke 40273,16 
if peek. (48312)-192 then poke 492300,16 
if peek (40339)-192 then poke 40327,16 
print "[2spaces,rvs] 1 [off,2spaces]- 
modul speichern":print 

print "[2spaces,rvs]) 2 [off ,2spaces)- 
modul testen”:print 

print "[2spaces,rvs) 3 [off ,2spaces)- 
zurueck ins hauptmenue”:print 

get Jn$:if Jn$=""” then 1940 

if Jn$="1" then 13998 

if jJn$="2” then 2078 

if Jn$=-"3" then 2028 

goto 1948 

print "[celr,18doun, 2spacesJmodul-name 
mn 


sys 17088 

if peek (532808) then 1838 

print "Cclr,4down, 4spacesJmodul schon 
abgespeichert [rvs] J/n Loff)]"” 

get jJnS:if jJn$="" then 2030 

if 4n$="n" then 1838 


PURED a ODE LSB A URBIEELND 


20598 
20608 
2070 


2080 
2030 


21008 
2118 


2120 
2138 
2140 


2150 
2168 
2170 
2188 
2190 
2208 


2210 
e220 


2238 
22408 
22508 


22508 
2270 
2280 
2230 
23008 
231® 


23208 
2330 
2340 


2358 
2360 
2370 
2388 
2390 


2490 
2410 


2420 
2430 


2440 
E4SO 
24608 


2470 
2480 
2490 
25098 
2510 
2520 


2530 
2548 
2550 


2560 
8570 
2588 
25928 
2608 
2618 
=6208 
26308 
2640 


2650 


if Jn$5=-")}" then run 

goto 2030 

print "[Celr]”:print tab(208-len (a$)/ 

B)a$:print :print :print 

print "dieser programmteil aendert 
einige”:print 

print "speicherstellen und Fuehrt 
danach ":print 

print "einen reset aus.":print 

print "bitte speichern sie zur 
sicherheit”:print 

print "vorher ihr geaendertes modul ab 
I":print :print 

print "[1®spaces,rvs] 1 [Loff, 2spaces]- 
abspeichern”:print 

print "[1®spaces,rvs].2 [off ,2spaces)- 
austesten”:print 

get jn$:if jJn$=""” then 2158 

if Jn$="1" then 1830 

if jn$="2" then sys 64738 

goto 2158 

rem modul saven, probelauf ?c128 

if peek (40704)<>162 or peek (4H0705)<> 

64 then 1798 

print "[Leir]"” 

print tab(29-len (a$)/2)ae$:print : 
print :print 

print "[2spaces,rvs) 1 [off , 2spaces]- 
modul speichern”:print 

print "[2spaces,rvs] 2 [off,2spaces]- 
modul testen”:print 

print "[2spaces,rvs] 3 [off ,‚2spaces])- 
zurueck ins hauptmenue”:print 

get Jn$:if jJn$="" then 2260 

if Jn$="1” then 2310 

if Jn$="2" then 2398 

if jns="3" then 2340 

goto 2268 

print "Cclr,18down, 2spaces)Jmodul-name 
7" 

poke 17108,96:sys 17088:poke 1710B,128 
if peek (53288) then 2199 

print "Cclr,4down, 4spacesJmodul schon 
abgespeichert [rvs] j/n Coff)” 

get jn$:if jn$="" then 2350 

if Jn$="n” then 2190 

if Jn$="j” then run 

goto 2350 

print "[clr)”:print tab(20-len (a$)/ 
E)a$:print :print :print 

print "dieser programmteil aendert 
einige":print 

print "speicherstellen und Fuehrt 
danach "”:print 

print "einen reset aus.":print 

print "bitte speichern sie zur 
sicherheit”:print 

print "vorher ihr geaendertes modul ab 
I":print :print 

print "[C18spaces,rvs] 1 [off,2spaces)- 
abspeichern":print 

print "[C10spaces,rvs] 2 [Loff,2spaces)- 
austesten”:print 

get jn$:if Jn$="" then 2478 

if jn$="1"” then 21398 

if Jn$="2" then sys 64738 

goto 2478 

rem 

if peek (36606)<>136 or peek (36607)<> 
136 then 1798 

sys 18176:poke 32768,8:poke 32769,143 
print "[celr)” 

print tab(20-len (a$)/2)a$:print : 
print :print 

print "[2spaces,rvs) 1 [off ,2spaces)- 
modul speichern":print 

print "[C2spaces,rvs) 2 [off ,2spaces)]- 
modul testen”:print 

print "[2spaces,rvs] 3 Loff,2spaces]- 
zurueck ins hauptmenue":print 

get jn$:if Jn$=-"" then 2530 

if jn$="1" then 2640 

if jn$="2” then 2720 

if jn$="3"-then 2678 

goto 2599 

print "Cclr,12down, 2spacesJmodul-name 


er 
poke 17132 ,144:sys 17088:poke 17132, 
168 
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> if peek (53280) then 2518 

print "Cclr,4down, 4spacesJmodul schon 
abgespeichert [rvs) J/n Loff]” 

get jn$:if jJn$=""” then 2680 

if Jn$="n” then 2518 

if Jn$="J” then run 

goto 2688 

print ”Celr]”:print tab(28-len (a$)/ 

@)a$:print :print :print 

print "dieser programmteil aendert 
einige”:print 


print "einen reset aus.":print 

print "bitte speichern sie zur 
sicherheit”:print 

print "vorher ihr geaendertes modul ab 
I";print :print 

print "[18spaces,rvs] 1 (off, 2spaces)- 
abspeichern": print 

print "[18spaces,rvs] 2 [off ,‚2spaces]- 
austesten": print 

get Jn$:if Jn$="" then 2890 

if Jn$="1" then 2510 


print "speicherstellen und Ffuehrt 


danach 


:print 


Maschinenpr: 


ußd 


ist x 
EPROM M“ tragen 


4000 
4008 
4010 
4018 
4920 
4028 
40308 
4038 
4040 
4948 
4058 
4058 
4060 
4068 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
d data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


a0,15,a2,02,18,20,F0,FF, 
a2,00,20,cf,ff,3d,00,45, 
eB,c9,0d,d®,fS,ca,Be,32, 
40,8e,32,40,2d,00,45,c9, 
24,d0,806,20,44,e5,4c,00, 
41,ea,a2,08,80,01,20,ba, 
FF,a9,04,a2,00,a0,45,20, 
bd,ff,a9,00,a4,b7,a6,b9, 
20,af,f5,a9,60,85,b9,20, 
d5,f3,a5,ba,20,09,ed,a5, 
b9,20,c7,ed,20,13,ee,8d, 
fe,40,35,90,4a,4a,h0,Of, 
20,13,ee,8d,FFf,40,20,42, 
£6,20,75,41,40,75,48,4c, 
75,41,4c,97,41,ad,Fe,40, 
c9,01,d0,f6,ad,ff,40,c9, 
08,d0,ef,a2,08,20,00,20, 
ba,ff,ad,32,40,a2,00,a0, 
45,20,bd,ff,a9,00,a2,10, 
a0,80,20,45,ff,20,75,41, 
a2,00,29,10,80,80,85,22, 
84,23,80,00,b1,22,c9,88, 
F®,02,2e6,22,d0,f6,e6,23, 
ea,“4c,8a3,43,86,22,b1,22, 


- 


SHSZERNNSEBENER. 


SrFbEbBE NEE 
BRRRESERBETEREN 


ENSuSSFuBB SB rEnN 


’ 
a5,b9,20,36,Ff 
90,a0,03,84, Fb 
85,fc,a4,90,d®, ‚a5, 
Ff,a4,90,d0,28,a4,fb,88, 
d®,e9,a6,fc,20,cd,bd,a9, 
20,20,d2,fF,20,85,Fff,a6, 
90,d0,12,aa,f0,06,20,d2, 
ff ,4c,4c,41,a9,0d,20,d2, 
FfF,20,e4,ff,F®,fb,ad,02, 
d®,c1,20,42,F6,20,e4,Fff, 
fd,fb,4c,91,41,a0,02,a2, 
0e,18,20,f0,ff,4c,52,43, 
ea,ea,ea,ea,ea,ba,ea,sa, 
ea,ea,sa,ea,sa,Ba,sa,sa, 
ea,a9,24,8d4,3c,03,60,aS, 
85,8d,3c,03,ea,sa,ea,ea, 
a0,14,a2,04,18,20,F0,FF, 
a2,00,20,cf,ff,9d4,00,50, 
88,c9,0d,d®,FS,a9,08,a0, 
00,84,22,85,23,b1,22,c9, 


m 


- 0. 0 0 00 00 0 0.» 


Se,f®,0b,c8,d8,F7,86,23, 


a5,23,c9,48,d0,ef,c8,b1, 
22,c9,31,d®,ee,c8,b1,22, 
c9,36,d80,87,c8,b1,22,c9, 
39,d0,e8,c8,b1,22,c9,30, 
d®,ee,c8,b1,22,c9,34,d®, 
e7,c8,c8B,a2,20,bd,00,50, 
c9,8d,d®,02,89,20,391,22, 
c8B,e8,e0,05,d0,ef,60,ea, 
20,fd,ae,20,f3,bc,20,F7, 
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if Jns="2" 
goto 2809 


then sys 64738 


b7,a5,14,85,22,85,15,85, 
23,a5,4e,c9,01,d0,03,“4c, 
37,42,c9,02,d0,83,4c,4e, 
42,c9,03,d0,03,4c,65,42, 
c3,04,d0,19,4c,7c,42,ad, 
fe,48,8d,48,Sd,ad,ff,42, 
8d,42,9d,a5,22,8d,“4e,9d, 
a5,23,8d,4f,9d,68,ad,fe, 
40,8d,5b,9d,ad,ff,40,8d, 
Sd,9d,85,22,84,69,9d,a5, 
23,8d,6a4,9d,60,ad,Fe,+40, 
8d,76,9d,ad,ff,40,8d,78, 
9d,a5,22,8d4,84,9d,a5,23, 
8d,85,9d,69,ad,fe,40,8Bd, 
91,9d,ad,FFf,490,84,93,9d, 
a5,22,84,9F,9d,a5,23,8d, 
a0,9d,60,ea,ea,ea,ea,ea, 
ea,ea,ea,ea,ea,ea,ea,ea, 
a2,00,20,cf,Ff,c9,0d,F®, 
08,94,45,9F,e8,e0,09,d®, 
£f1,60,22,00,bd,00,45,9d, 
7e,9Ff,e8,c9,20,d0,f5,60, 
a2,00,20,cf,ff,3d,00,45, 
e8,c9,0d,d0,f5,ca,Be,df, 
42,39,00,a0,80,85,Fb,8B4, 
fc,a2,08,20,ba,ff,a9,08, 
a2,00,a0,45,20,bd,ff,a9, 
fb,a2,00,30,80,20,d8,FFf, 
4c-,75,41,ea,ea,ea,sa,sa, 
esa,ea,sa,ea,ea,ea,ea,ea, 
b8,9c,7b,e3,c3,c2,cd,38, 
30,08,00,20,00,00,00,00, 
a2,11,bd,ff,42,9d,Ff,7Ff, 
ca,dß,F7,a2,04,a0,b0,a3, 
43,84,22,85,23,a9,9c,84, 
24,85,25,80,00,b1,22,31, 
24,c8,d0,F9,e6,23,e6,85, 
ca,d®,f2,60,20,20,20,20, 
a2,00,bd,00,45,c9,0d,f0, 
08,3d,7e,9f,eB,e®,de,d®, 
f1,60,a9,08,85,ba,20,b4, 
Ff,a9,6f,85,b9,20,36, ff, 
20,a5,ff,20,d2,Ff,c9,0d, 
d®,f6,20,ab,ff,68,ad,b®, 
9c,c9,8e,d®,8F,ad,b1,9c, 
c9,16,d0,08,ad,b2,9c,c9, 
d®,d0,01,60,a9,8c,8d,3c, 
03,69,ca,f®d,fc,4c,ac,40®, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
Be,16,d0,20,a3,Ffd,20,50, 
£fd,20,15,fd,20,5b,ff,58, 
20,53,e4,20,bf,e3,ad,fb, 
9a,a9,0e,8d,20,d0,a9,0f, 
8d,21,d0,a9,26,84,86,02, 
a9,93,20,d2,Ff,a9,90,20, 
d2,Ff,a9,12,20,d2,ff,a9, | 
20,a2,78,20,d2,Fff,ca,d®, 

fa,a9,1c,20,d2,Ff,a9,20, 
a2,78,20,d2,ff,ca,d®,fa, 
a9,9e,20,d2,ff,a9,20,a2, 
78,20,d2,ff,ca,dd,fa,4c, 
e6,9d,ea,20,1e,ab,20,e4, 
ff,c9,85,d0,803,4c,35,9d, 
c9,86,d0,03,4c,50,9d,c9, 
87,d0,03,4c,6b,94,c9,88, 
d®d,e4,4c,86,9d,a2,20,a39, 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


‚data 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


10,30,80,85,22,84,23,a9, 
01,a0,08,85,24,84,25,20, 
a1,3d,20,b2,9d,4c,c1,9d, 
a?,20,29,10,30,80,85,22, 
84,23,89,01,a0,08,85,24, 
84,25,20,831,9d,20,b2,3d, 
4c,c1,9d,a2,20;39,10,a®, 
80,85,22,84,23,39,01,a0, 
08,85,24,84,25,20,a1,9d, 
20,b2,9d,4c,c1,39d,a2,20, 
a9,10,80,80,85,22,84,23, 
a9,01,30,08,85,24,85,25, 
20,a1,9d4,20,b2,3d,“4c,c1, 
9d,20,80,b1,22,91,24,c8, 
d®o,f93,e6,23,e6,25,ca,d®, 
£f2,60,e6,25,85,24,85,2d, 
a5,25,85,28e,a9,28,85,ba, 
60,a9,93,20,d2,Ff,a9,52, 
20,d2,Ff,a9,55,20,d2,FfFf, 
a9,4e,20,d2,Ff,a3,13,8d, 
77,02,89,04,8d,78,02,a9, 
02,85,c6,4c,86,e3,a2,00, 
bd,59,9e,9d4,40,03,eB,ed, 
46,d0,F5,39,00,a0,Sf,“c, 
13,9d,20,20,20,208,20,20, 
42,20,49,49,04,20,34,339, 
31,35,32,2d,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,28,20,20, 
93,0d,2d,20,20,208,42,49, 
54,54,45,28,50,4c,41,54, 
49,4e,45,20,41,42,53,54, 
y5,4c,40,45,4e,0d,20,20, 
20,20,20,29,20,20,20,20, 
12,30c,53,58,41,43,45,3e, 
92,0d,00,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
a9,20,20,39e,20,1e,ab,20, 
e4,ff,c9,20,d0,f3,4c,00, 
c0,39,20,a0,3e,20,le,ab, 
29,e4,ff,c9,20,d0,F9,4c, 
00,c0,29,20,a0,39e,20,1e, 
ab,28,e4,ff,c9,20,d0,F3, 
4c,00,c0,a9,20,a0,3e,20, 


20,28,20,20,20,20,20,20, 
20,20,20,20,20,20,20,22, 
29,20,20,20,20,29,20,20, 
20,20,20,208,20,20,20,20, 
20,20,20,20,20,20,20,20, 
290,20,20,20,20,20,20,20, 
20,20,280,20,20,20,20,20, 
20,20,20,20,20,20,20,22, 
20,28,20,20,20,20,20,28, 
20,20,29,20,20,20,20,20, 


20,20,20,20,20,20,20,20, 
04,1F,63,63,63,63,63,563, 
63,63,63,63,63,63,63,63, 
63,63,63,63,63,63,63,63, 
63,63,63,63,63,63,63,63, 
63,63,63,63,63,63,63,63, 
63,63,90,20,20,20,20,20, 
20,8e,45,50,52,4F ,4d,20, 
4d,4f ,44,55,40,20,20,42, 
59,20,20,20,1F,20,20,20, 
20,20,20,20,20,20,20,20, 
04,53,63,63,63,63,63,63, 
63,63,63,63,63,63,63,63, 
63,63,63,63,63,63,63,63, 
63,63,63,63,63,63,63,63, 
63,63,63,63,63,53,63,63, 
63,0d,2d,930,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,3a, 
29,12,1c,20,46,31,20,0d, 
04,30,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,3a,20,12, 
1c,20,46,33,20,0d,0d,30, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,3a,20,12,1c,20, 
46,35,20,0d,2d,90,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,38,20,12,1c,20,46,37, 


Th ER hu ch, 


46F® 
46F8 
4709 
4708 
4719 
4718 
4720 
4728 
4730 
4738 
4740 
4748 
4750 
4758 
4760 
4768 
4770 
4778 
4780 
4788 
4790 
4798 
4720 
47a8 
47b® 
47b8 
47c® 
47cB 
47d8 
47d8 
47e® 
47e8 
47F® 
47£8 
4800 
4898 
4810 
4818 
4820 
4828 
4830 
4838 
4840 
4848 
4859 
4858 
4860 
4868 
4870 
4878 
4B80 
4888 
4899 
4838 
4Bad 
4BaB 
48b8 
45b8 
48c® 


48d90 
48d8 
4Bed 
4BeB 
48f® 
4BF8 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


20,2d,02d,20,00,200,00,00, 
00,00,00,90,00,00,00,00, 
a2,00,bd,b3,9c,9d,08,8f, 
e8B,e0,13,d0,Ff5,a2,00,bd, 
35,9d,3d,13,8F,e8,e®,12, 
do,f5,a2,80,bd,al,9d,9d, 
25,8Ff,e8,e0,42,d0,F5,ad, 
48,9d,c9,01,d0,19,ad,H2, 
94,c9,08,d0,12,ad,4d,Sd, 
8d4,77,8F,a9,86,8d,78,Bf, 
a9,e3,8d,79,BF,d8,17,ad, 
4d4,9d4,8d4,77,8F,ad,4te,3d, 
84,78,8F,ad,4f,9d,8d,73, 
BF,a9,00,8d4,64,8F,a9,1®, 
8d,14,8Bf,a9,ea,8d,35,8f, 
8d,44,8f,a2,00,6d,79,47, 
94,67,8f,e8,e0,10,d0,F5, 
69,22,00,6d,08,8F,34,00, 
B8f,e8,d0,Ff7,20,02,Ffd,FfB, 
fb,ea,ea,ea,sa,ea,sa,ea, 
a2,00,bd,008,43,9d,20,60, 
eB,e8,10,d0,f5,a9,00,8d, 
00,60,89,bF,8d,01,60,a2, 
00,bd,c8,47,9d,00,9F,e8, 
de,f7,60,ea,sa,ea,esa,sa, 
ea,sea,sa,sea,sa,sa,sa,sa, 
a2,40,a9,10,20,80,85,22, 
84,23,39,01,30,08,85,24, 
84,25,80,00,b1,22,31,24, 
c8,d®,F9,e6,23,8e6,25,ca, 
do,f2,a2,00,bd,a®d,bf,Sd, 
490,03,eB,e8,38,d8,f5S,a2, 
00,bd,40,bF,20,d2,Ff,e8, 
ed,4f,dd,F5,4c,40,03,ea, 
93,04,02d,20,42,49,54,54, 
45,20,50,4c,41,54,49,4e, 
45,20,41,55,53,53,43,48, 
41,4c,54,45,4e,0d4,0d,0d, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
29,20,20,3c,53,58,41,43, 
45,3e,0d,28,20,20,20,20, 
20,29,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,02,fd,F0,fb,a9,33,20, 
d2,ff,a9,52,20,d2,fFf,aS, 
S5,20,d2,Fff,a9,4e,20,d2, 


SSH AEHUSSH 


22,85,23,89,ed, 
E3,85,25,b1,22, 
4,c8,d0,F9,e6,23,8e6, 
25,ca,d®,f2,a9,e5,8d,d6, 
£d,a9,35,85,01,4c,e2,fc, 
20,20,29,20,20,20,20,20, 


MEelrhonnsn 


.. 


n 


For a=-16384 to 18689 step 
8:5=-9:c=®:Ffor b=® to 7: 
gosub 560840 
s=s+h+l-c:0=s>255: s=-255-s 
and 255:poke a+tb,h+l:next 
b:gosub 60048 
f$S-"pruefsumme ok"”:if s<c> 
h+l then FS="[rvs] 
pruefsummenfehler":fF=F+1 


gosub 60838:next a:print ” 


Cdown]”f”fehler”:end 
read h$:gosub 608059:h=1* 
16:h$=mid$ Ch$,2) 
l-asc (h$+”"x”)-4B:if 
or 1>22 then 50088 
if 1<18 then return 
l=1-7:if 1>9 then return 


1<8 


£fS5=-"[rvsleingabefehler”:1- 


®:f=-f+1 
print "zeile” peek (64)* 
256+psek (63)Ff$: return 


4038 


5234 


Ss633 


2267 
2715 
3198 
1044 
1334 
2460 


2726 
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Rechner: C128 
Typ: Utility 
Sprache: ASM 


Im Basic 7.0 gibt es keinen 
MERGE-Befehl. Wer Programme 
aneinanderhängen will, braucht 
das Dienstprogramm MERGE. 
DLOAD lädt ein File vom Typ PRG 
immer ab der Adresse, die durch 
den Zeiger in 45/46 (beim C64 in 
43/44) bestimmt wird. Beim C128 
zeigt dieser Pointer in der Stan- 
dardkonfiguration auf die Adres- 
se 7169. Diese Startadresse wird 
durch Verändern des Zeigers ver- 
schoben. Der Zeiger für das Ende 
des Basic-Textes steht in 4624/ 
4625 (beim C64 in 45/46). 

Daraus leitet sich der Algorithmus 
für die MERGE-Routine ab: 

Von der Endadresse wird 2 abge- 
zogen und in den Zeiger für den 
Basic-Anfang geschrieben. Das 
anzuhängende Programm wird 
nun ganz normal geladen. Danach 
wird der Zeiger für den Basic-An- 
fang wieder auf den ursprüngli- 
chen Wert zurückgesetzt. 

Dann müssen die Basiczeilen neu 
gebunden werden und das neue 
Ende des Basic-Textes in den Zei- 
ger für das Textende geschrieben 
werden. Das ist kein Problem, 
denn dafür gibt es im Betriebssy- 
stem die Routinen LINK ($4F4F) 
und SETEND ($4F82). 

Aus Geschwindigkeitsgründen 
wurde MERGE in Maschinenspra- 
che geschrieben. Das Programm 
kann mit dem Assembler des Mo- 
nitors eingegeben werden. Be- 
quemer ist jedoch der Basic-La- 
der. Hier sind zwei Prüfroutinen 
enthalten, durch die Fehler beim 
Abtippen sofort erkannt werden. 
Beim Probelauf werden Fehler lo- 
kalisiert gemeldet und können da- 
her rasch und problemlos beho- 
ben werden. 

Ist MERGE lauffähig im Speicher, 
kann es als Binärfile mit BLOAD 
oder dem Monitor platzsparend 
gespeichert werden. Die dazu er- 
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MERGE 128 mischt 
Programme und 


ermöglicht modulares 
Programmieren. 


forderlichen Adressen sind $0C80 

(von) $0CD2 (bis). 

MERGE wurde reloctabel ge- 

schrieben und funktioniert daher 

in jedem anderen Speicherbe- 
reich. Dazu ist lediglich die Start- 
adresse passend zu ändern. In 
der vorliegenden Version liegt es 

im RS 232-Puffer. 

Bei der Anwendung von MERGE 

ist zu beachten: 

l. Die niederste Zeilennummer 
des anzuhängenden Pro- 
grammes muß höher sein als 
die höchste der im Speicher 
stehenden. Nötigenfalls sind 
die Programme mit Renumber 
zu justieren. 


Praxis Listing zazmeerme ur ers er en 


Aus 2 mach I 


2. Die Variablenbelegung muß 

- unterschiedlich sein. Gleiche 
Variablen in beiden Program- 
men können später die Ursa- 
che für Fehlfunktionen sein. 

3. Das erste Programm (mit den 
niedrigeren Zeilennümmern) 
ganz normal (zum Beispiel mit 
DLOAD) laden. 

4. Das anzuhängende Programm 
im Direktnodus mit OPEN 
8,8,8, “Name des Programmes“ 
:SYS3200 laden. Das File wird 
durch das Maschinenpro- 
gramm geschlossen. 

5. Das neue Programm ganz nor- 
mal mit DSAVE "Neuer Name“ 
auf Diskette speichern. 

Es können mehrere Programme 
aneinandergehängt werden. Die 
in der OPEN-Anweisung gewählte 
logische File- und Kanalnummer 
ist festgelegt, da das Maschinen- 
programm diese Parameter er- 
wartet. 


1 We rn 


merge fuer c128 


(c)19386 by ilse u, 


rudolf wolf 


;start mitiopen8,8,8,"name"!isys4864 


eilrchn 
close 
link 
setend 
status 
txttab 
textop 
ptr 
store 


’< basicende 


textop 
#592 
ptr 
textop+15> basicende 
#$998 
ptr+1 


’< neuer basicstart 


’> neuer basicstart 


salten basicstart retten 
ldx txttab 
ldy txttab+1 
stx store 
sty store+] 


‚programm anhaengen 
lda #$08 
sta status 
ldx #398 
jsr chKinsausgabeKanal oeffenen 
3Ssr chrinsladeadresse sKippen 
jsr chrin 
ldy #398; zaehler 
jSsr chrin ?ladeschleife 
sta (ptr),y 
cpy Hsff 
iny 
beq plus 
Ida status 
beq loop 
JSsr cliIrchn Kanal schliessen 
lda #398 
jSsr close;file schliessen 


salten basicanfang zurueckholen 
lda store 
sta txttab 
Ida storet+i 
sta txttab+i 


‚neue endadresse setzen 
jSsr link’zeilen neu binden 
jmp setend 


Das WERSIBOARD-SYSTEM 
MUSIC 64 besteht aus einem Orgel- 
Manual im Commodore-Design, 


srucksack der ladeschleife 
plus inc ptr+1 
ldy #$98 


einem Interface-Modul und 
beq check 


zugehöriger Software. Gemeinsam 
mit dem Commodore VC 64 entsteht 
ein Musikinstrument mit 
bemerkenswerten Fähigkeiten. 


Komplett-Paket bestehend aus: 


KEYBOARD 

— 49 Tasten, 4 Oktaven C-C 

— PROFIFORMAT 

— Gehäuse aus stoßfestem Kunststoff 
im Commodore-Design 

— Interface-Modul mit 


a-3208:for z=-27®8 to 378 step 18:s=® 
for e=1 to B:read d:poke a,d:s=s+d 
a=-a+tl:next :read d:if s<>d then 248 
next 

print "[clr,down] als binaerfile 


Verbindungskabel, anschlußfertig 
SOFTWARE 


— auf 51/4” Diskette 

— Programm MONO 64 — 
monophoner Synthesizer 

— Programm POLY 64 — 


speichern?”; 

print ”-j/n":get key k$ 

if k$<>”j” then scncelr :end 

bsave "”merge3200”,b®, p3208 to p32B2 
senclr :end 

print "eingabefehler in zeile”;z:end 
dz=-peek (65)+256*peek (66) 

print "zeile”;dz"”-> ” err$ (er) 

data 56,173,16,18,233,2,133,250,881 
data 173,17,18,233,0,133,251,166,991 
data 45,164,46,134,252,132,253,169, 
1195 

data 8,133,144,162,8,32,198,255,932 
data 32,207,255,32,207,255,160,0,114B 
data 32,207,255,145,250,192,255,200, 
1536 

data 240,26,165,144,240,242,32,204, 
1293 

data 255,169,8,32,195,255,165,252,1331 
data 133,45,165,253,133,46,32,79,88B6 
data 79,76,130,79,230,251,160,0,1085 
data 240,224,80,0,0,0,0,0,464 


polyphones Keyboard 
— Klangfarben direkt am PC 
veränderbar 


Direkt ab Werk, noch heute bestellen! 


nur DM 295, — 


incl. Basis-Software 
® 


ORGELN - PLANOS - KEYBOARDS 

Industriestraße : 5401 Halsenbach 

Telefon (06747) 123-0 : Telex 42323 

BESTELLCOUPON 

Das WERSIBOARD MUSIC 64 ist Klasse 

OlIch bestelle zu sofortiger Lieferung das 
WERSIBOARD MUSIC 64 zum 
Einführungspreis von DM 295,— 
— zuzügl. Versandseibstkosten — 

gewünschte Zahlungsart 

U Scheck ist beigefügt 

Ol per Nachnahme 


Unterschrift 
Coupon abtrennen und an Wersi senden! 
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Listing 2: Programme mischen in Maschinensprache 


BPIV NE SHELL EN D KEFPLRSE NT 


EEEAUEFTTZESEZIEOTFETE Praxis Listing 


Manipulationen, daß Bits und 


System: C64/Floppy 
Typ: Utility 
Sprache: Assembler 


Menügesteuert, mit allen erdenk- 
lichen Möglichkeiten zur Bearbei- 
tung der Diskette ausgestattet, 
präsentiert er sich der Commodo- 
re 64-Gilde. 

Mit ihm werden Files sortiert, 
Trennungen eingefügt, Bemer- 
kungen in das Inhaltsverzeichnis 
geschrieben, Diskname und ID- 
Nummer geändert, Ladehilfen an- 
gehängt... und .... und... und 


Im Directory ist kein Sektor sicher 
vor dem DIRECTORY MANA- 
GER. Er liest zuerst alle Daten aus 
dem Directory-Track (Spur 18) in 
seinen Zwischenspeicher. Dort 
werden sie mit nachfolgenden 
Funktionen bearbeitet. 


Überlegene 


Geschwindigkeit 
VER 


Das gesamte Programm ist aus- 
schließlich in Maschinensprache 
geschrieben und daher wesent- 
lich schneller als vergleichbare 
BASIC-Programme. DIRECTORY 
MANAGER arbeitet mit Speed- 
dos, Hypra-Load und dem Dela- 
Profi-Betriebssystem ohne Proble- 
me zusammen. 

Das Programm startet mit RUN/ 
STOP-RESTORE. Das Anfangsbild 
(Hardcopy I) zeigt den Status der 
Diskette, Die Funktionen: 

„N': Name & ID 

Diese Funktion ermöglicht, den 
Namen und die ID (fünfstellig) zu 
ändern. Um ein gutes Ergebnis zu 
erhalten, wird eine eigene Input- 
routine verwendet. 

„D": Disk-Kommentar 

Der auf Diskette brachliegende 
Bereich in Track 18, Sector 0, 
Bytes 166-255, wird sinnvoll ge- 
nutzt. Ein Disk-Kommentar in CBM- 
Bildschirmcodes (!), der selbst mit 
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BRRV NEE OHNE NND IREETSOVIIFEIOBE INNE 


Es ist kein Traum. Es ist 
kein Gerücht. Es ist 


Wirklichkeit: Der 
DIRECTORY MANAGER 
ist da! 


einem Diskmonitor nur schwer zu 
lesen ist, belegt diesen Platz. 

„B": BAM belegen 

Mit dieser Funktion wird die BAM 
der Diskette total belegt (also 0 
Blocks free). „Validate“ macht 
diesen Vorgang rückgängig. 

„P": Protect 

Die Diskette wird softwaremäßig 
gegen Schreibzugriffe geschützt. 
Dies bedeutet, daß Funktionen 
wie „Scratch", „Rename", „Copy“, 
„Validate", „New“, und „Block- 
Write“ nicht mehr möglich sind. 
„P" entspricht der Funktion des 
Schreibschutzaufklebers mit einer 
Ausnahme: Formatieren mit ID ist 
möglich. Aufgehoben wird dieser 
Schutz durch nochmaliges „P". 
„E": Einlesen 

Die Diskette wird erneut eingele- 
sen, ohne bisher erfolgte Ände- 
rungen abzuspeichern. 

„A': Abspeichern 

Veränderungen werden auf die 
Diskette zurückgeschrieben. 

„Q": Quit/Ende 

Schließt alle offenen Kanäle und 
führt einen Basic-Kaltstart durch. 
Veränderungen müssen vorher 
mit „A" abgespeichert werden. 
„O": Catalog 

Ein Sprung ins zweite Menü wird 
durchgeführt, um dort die Direc- 
tory zu bearbeiten. Sämtliche Än- 
derungen im ersten Menü bleiben 
erhalten und können später abge- 
speichert werden. 

Menü II: (siehe Hardcopy II) stellt 
weitere Funktionen zur Verfü- 
gung: 

Filetyp: 

Ein beliebiges File wird durch 
Ole „2, „Sr oder „4"in.den 


Bytes sich biegen 


entsprechenden Filetyp umge- 
wandelt. Die Anzeige „—" ent- 
spricht einem gescratchten File, 
welches (falls es noch nicht über- 
schrieben wurde) durch Drücken 
der Taste „2" wieder in ein ladba- 
res Programmfile verwandelt 
wird. 


Universelle 


Anpassungen 
Eee 2 2 


Ladehilfe: 

Die Tasten „5", „6", „Z' oder „8" 
verkürzen den Filenamen auf 12 
Zeichen und hängen die entspre- 
chende Ladehilfe an. Der Anfang 
„‚8:" ist für Basic-Programme, 
„.‚8,1" für Maschinenprogramme, 
„‚8,2" für Speeddos-Besitzer, 

„‚8,0° lädt an einen bestimmten 
Speicherbereich (zum Beispiel 
beim „Profi-Betriebssystem" von 
Dela). 

Trennen: 

Die jeweilige Taste (siehe Hardco- 
py II) erzeugt einen Balken über 
dem momentan angezeigten File 
aus dem Zeichen der Taste. 
Cursor down: 

Scrollt die Files nach unten. 
Cursor up/ Cursor right: 

Scrollt die Files nach oben. 


Was weg ist ist weg 
RREREEFER TE SE STRESRIEN 


„S": Scratch: 

Beim üblichen Scratch-Befehl 
wird der Fileeintrag auf der Dis- 
kette nicht entfernt sondern nur 
als gelöscht gekennzeichnet. 
Außerdem werden die vom File 
belegten Blocks in der BAM wie- 
der freigegeben. Beim DIREC- 
TORY MANAGER löscht der Be- 
fehl „Scratch“ den Fileeintrag 
endgültig aus der Directory. Falls 
es sich um ein SEQ, PRG, USR 
oder REL File handelt und die 
BAM nicht vorher komplett belegt 


wurde, sendet es einen normalen 
Scratch-Befehl an die Floppy. 

Dies funktioniert jedoch nur, wenn 
das File nicht geschützt auf der 


Diskette vorliegt. Andernfalls 
wird der Fileeintrag zwar ge- 
löscht, die vom File belegten 
Blocks jedoch nicht freigegeben. 


Softprotect contra 


Scratch 
WERBEBEITETTITERE 


Falls man die Freigabe der Blocks 

erzwingen will, empfiehlt sich fol- 

gendes Vorgehen: 

1) Den Befehl „Unprotect“ für das 
File anwenden 

2) Die Directory mit „Ä" abspei- 
chern und mit „C" wieder ein- 
lesen 

3) Ein evtl. als DEL gekennzeich- 
netes File z. B. in PRG umwan- 
deln 

4) Den „Scratch“-Befehl anwen- 
den 

Die Freigabe der Blocks unter- 

drückt man durch folgendes Vor- 

gehen: 

2) Das File mit DEL kennzeichnen 

2) Den „Scratch‘-Befehl anwen- 
den 

„R“: Rename: 

Dieser Befehl ändert den Filena- 

men. Es ist möglich, in dem neuen 

Namen beliebige Steuerzeichen 


MEHUE I 


I Name & ID I PSload"’info",2 : 
km 


I Disk - Kommentar | 
!IManfred Deterdins 
INittekindstr. 42 
14539 Bochum 7 
ITel: (9224) 2594099 


Catalos (Directors) bearbeiten 


Einlesen AbzfPeichern 


So präsentiert sich der DM zu Beginn 


einzubauen oder einen Kommen- 
tar anzuhängen. 

„B": Blocks: 

Manipuliert die in der Directory 
angezeigte Blockanzahl eines 
Files. 

„P": Protect: 

Diese Funktion nutzt die Möglich- 
keit der Floppy 1541, einzelne 
Files vor dem Scratchen zu schüt- 
zen. 

„U“: Unprotect: 

Macht PROTECT unwirksam. 

„V“: Verschieben: 

Holt einen Fileeintrag in das obe- 
re Textfenster. Mit „CRSR up" 
oder „CRSR down" wird es ver- 
schoben und mit „Return“ wieder 
vor dem aktuell angezeigten File 


eingefügt. 

„M“: Menü: 

Rücksprung zu Menü I ohne die 
erfolgten derungen abzuspei- 
chern. 


„A": Abspeichern: 

Speichert die Veränderungen 
endgültig auf Diskette ab. Springt 
danach ins Menü I zurück. 
Anmerkung: Falls die Diskette mit 
einem Schreibschutzaufkleber 
versehen ist, springt das Pro- 
gramm bei einem Schreibvorgang 
selbständig ins Menü I zurück. 
Veränderte Input-Routine: 

Um eine optimale Nutzung der 
Programmfunktionen zu ermögli- 
chen, wurde hierfür eine eigene 


IFiletsp: 
ILaden 

Trennen: 
IBefehle: 
IBefehle: 


Auit 


Werschieben IDEL werschiebe-text 
| EEE ER 


Input-Routine entwickelt. So kann 
man zum Beispiel bei einer Einga- 
be mit dem Cursor nicht aus dem 
zulässigen Bereich herausfahren. 
Die Taste „DEL“ löscht die gesam- 
te Eingabezeile. Die „INST"-Taste 
bewirkt, daß folgende Zeichen im 
Insert-Modus eingegeben wer- 
den. 


Sonderzeichen kein 


Problem 
[9 ee FE FEST 


Es ist möglich, Steuerzeichen wie 
Cursorfarben, „CLR“ und „DEL" 
in den Text aufzunehmen. Diese 
Steuerzeichen werden beim Di- 
rectory-Manager auch als solche 
angezeigt! 

Ladehilfen: 

Das Programm sollte, nachdem es 
eingetippt wurde, zu allererst ab- 
gespeichert und dann gestartet 
werden. Nach dem Start speichert 
sich das Programm wahlweise auf 
Diskette oder auf Kassette unter 
dem Namen „Dir-Manager" ab. 
Dieses Programm ist mit LOAD 
„Dir-Manager" ‚8,1 von Disk oder 
‚\,l von Kassette zu laden und mit 
RUN/STOP-RESTORE zu starten. 
Ein Tip zum Schluß: Üben sollte 
man auf einer extra dafür angefer- 
tigten Sicherheitskopie einer be- 
liebigen Diskette. 

M. Deterding EEE 


MENUE II 


933 | 
nn 


| 


directory 


E 2 2 2 3 
- 

E35 

E 3 
kanager * 
* 


WERE 


* 


* (c) 1926 by 
# 

* m.deterding %# 
* 

Eu = 2 2 2 2 2 2 2 2 2 2 2 2 22 


5 

8 

& 

[2 

a 

8 

Eu 2 2 3 2 2 2 2 2 2. 2 2 2 2. 22 a 
* 8 
a 

* 5 
& 

3 a 
5 


a=DEL 1=SEQ 2=PRG 3=USR PR! 


: 9=,8: 6=8,1 7=8,2 2=8,0 


+ 444 ik = men 2 
Scratch Rename Blocks Protect | 
Unprotect Menue Abspeichern| 


Das Arbeitsmenue des Directory Manager 


EUER IE ONE NE FINE 
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Praxis Listing ssseam228a:: san ra ne 


>» 


rem hrs ahhhhhnhnnhhhh ch nn 
rem * 

rem directory-manager 
rem 


rem von 
rem 

rem manfred deterding 
rem wittekindstr ‚42 
rem 4638 bochum 7 
rom * 

rem EZ Ze Ze ze ze zz ze ze ze ee en 


EI EEE 8 


poke S5,8:poke 56,128:clr 

poke 53280,0:poke 53281,0 

print "Cgrn,cir,6down,4rightllese 
datas" 

For i=32768 to 37861 

gosub 39:poke i,h+l:te-te+h+l 

next 

if te<>518883 then print "[clr ,‚4doun, 

“Mrıghtlfehler in datas”:end 

print "[clr,Sdown, 7rightlabspeichern 
auf:” 

print "C3doun, ?right,rvs) 1 CLoff) 
cassette” 

print "Cdown,7right,rvs) B Coff] 
Floppy B" 

print "Cdown,7right,rvs] 9 Loff) 
floppy 93” 


get a$:if aS<>”"1l” and a$<>"B" and a$<> 


”»3" then 33 

ga=-val (a$) 

print "Cblk,home,, 3down]p043, 0: pO044, 
128: p045,230: p046, 147:sA”; 

print chr$ (34); "dir-manager”;chr$ 
(34);",";ga; "Chome]" 

poke 198,2:poke 631,13:poke 632,30 
end 


read h$:gosub 48:h=1l*16:h$=mid$ (n$,2) 


l=-asc (Ch$)-4B8:if 1<18 then return 
1*-1-7:return 

data 29,80,37,80,c03,c2,cd,38 
data 30,78,a2,Ff,393,d8,8e,16 
data d®,20,a3,Fd,20,50,fd,20 
data 15,fd,20,5b,Ff,58,20,53 
data e4,ad,a®d,e4,c9,44,d0,03 
data 20,51,F4,20,bf,e3,a2,Ffb 
data 93,20,22,e4,20,44,05,a9 
data 60,85,Fb,a9,80,85,fc,a3 
data 34,85,fd,a9,08,65,Ffe,a0 
data 90,a2,14,b1,fb,91,fd,cB 
data dd,f9,e6,fc,e6,fe,ca,10 
data f2,a9,ff,85,cc,4c,34,08 
data ad,18,d0,09,902,8d,18,d® 
data a3,08,20,d2,FF,a3,00,85 
data 02,29,20,8d,20,d0,a9,00 
data 8d,21,d0,a2,d8,80,00,a9 
data 05,84, Fb,86,fc,a2,dc,31 
data fb,c8,dd,Fb,86,fc,et,fc 
data d®,FS,a2,08,30,00,a9,04 
data B5,fe,a9,d2,85,fb,a9,17 
> data 85, fc,84,fd,bi1,Ffb,S1,fd 
data c8,dd,f9,e6,fc,e6,fe,eH4 
data fFe,d®d,Ff1,89,0d4,Bd,2a,d8 
data Bd,F5,d8,8d,0d4,d9,8d, fc 
data d9,a9,07,8d4,86,02,35,02 
data 29,80,f0,0b,29,00,85, fd 
data a9,20,85,fe,4c,06,29,20 
data et,ff,Ff®,fb,a9,0f,a8,a2 
data 08,20,ba,ff,a9,01,32,69 
data a0,15,20,bd,ff,20,c0, ff 
data 20,4e,13,39,92,a8,a2,08 
data 20,ba,ff,a9,01,a2,53,a0 
data 15,20,bd,Ff,20,c0,Ff,a3 
data 20,85,Fe,a9,02,85,fd,a8 
data 31,8d,88,15,39,38,8d,8F 
data 15,39,30,8d4,91,15,84,92 
data 15,20,71,13,c6,fd,a0,008 
data a5,fc,91,Ffd,c6,fd,a5,Ffb 
data S1,fd,a2,01,a8,de,20,0c 
data e5,a2,01,a8,99,b1,Fd,c9 
data 0d,d®,02,89,Ff,86,d8,20 
data d2,Fff,c8,cd,ad,dd,ee,a9 
data 20,20,d2,Ff,20,d2,Ff,28 
data d2,Ff,a2,01,30,a2,bil,fd 
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data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


c9,04,d0,02,89,FFf,86,d8 
20,d2,ff,c8,cd,a7,dd,ee 
a9,20,20,d2,Ff,a0,02,bl 
fd,c9,41,d0,11,a2,de,a0 
le,20,0c,e5,39,6b,a®,15 
20,le,ab,4c,85,03,aP,®e 
a0,1e,20,0c,e5,a9,71,a0 
15,20, le;ab,a2,0Ff,20,c9 
FF,a0,808,b9,39c,15,F0,06 
20,d2,FFf,cB,dd,F5,28,cc 
Ff,a3,07,a0,08,39,43,d9 
c8,c0,14,d0,F8,30,00,a2 
af,bd,00,20,99,43,95,e8 
c8,c0,14,d0,f4,a9,07,a8 
00,99,33,d9,c8,c0,14,d® 
F8,20,08,bd,00,20,99,33 
05,e8,c8,c0,14,d0,£4,a9 
07,80,00,99,e3,d9,c8,c® 
14,d0,F8,30,00,bd,00,20 
99,23,05,e8,c8,cd,14,d® 
E4,a9,07,30,00,99,33,da 
c8,c0,14,d®,f8,a0,09,bd 
00,20,393,33,806,88,c8,c® 
14,d0,f4,a2,04,bd,00,20 
d®d,1c,e8,e90,90,d0,F6,a2 
08,30,1d,20,0c,e5,a9, 77 
a8,15,20,1e,ab,a5,02,09 
20,85,02,40,20,0a,a2,08 
a0,1d,20,0c,e5,a9,7F,a® 
15,20,l1e,ab,a2,15,a0,03 
20,0c,e5,39,f1,a0,15,20 
le,ab,a2,14,a0,03,20,0c 
eS,89,24,a0,15,20,1e,ab 
82,16,30,03,28,0c,e5,a9 
ca,a®,15,20,1e,ab,20,e4 
fF,f®,Ffb,c9,4e,d0,6c,39 
07,8d,86,02,20,00,a2,30 
bd,80,20,99,080,1f,c8,eB 
ed,a0,d®d,f4,39,01,85,4b 
a9,0de,85,40,39,180,85,49 
20,ad,13,a8,00,a2,30,b39 
08,1F,94,008,20,c8,e8,e8 
30,d0,F4,20,00,a2,a2,bd 
00,20,39,00,1F,cB,eB,e®d 
a7,d0,F4,a9,01,85,4b,a9 
21,85,4c,89,05,85,40,20 
8d,13,30,00,a2,a2,b3,00 
ı1F,3d,08,28,cB,e8,e0d,a7 
dß,fF4,a5,02,09,40,85,02 
“4c,48,08,c9,44,f0,03,4c 
4a,0b,a9,07,8d4,86,02,a9 
08,85,4b,89,03,85,4c,a9 
14,85,40,20,2d,13,a9,0a 
85,4b,39,03,85,4c,a9,14 
85,40,20,2ad,13,39,0c,85 
4b,89,03,85,40,39,14,85 
40,20,ad,13,a9,0e,85,4b 
a9,03,85,4c,a5,14,85,40 
20,ad,13,a0,00,a2,af,b3 
43,05,9d,00,28,e88,c8,c0 
14,d0,f4,a0,800,b9,33,085 
9d4,00,20,e8,c8,c8,14,d® 
£4,a0,00,b9,23,05,3d,08 
20,e8,c8,c0,14,d®,F4,a® 
00,b9,33,06,9d4,20,20,e8 
c8B,c®,14,d0,f4,a5,02,09 
40,85,02,4c,4a,2a,c3,42 
dd,28,29,00,a2,04,54,98 
20,28,e0,30,d0,f8,39,07 
8d4,86,02,82,08,a0,1d,20 
0c,e5,a9,77,a0,15,20,1e 
ab,a5,02,09,60,85,02,“4c 
4a,0a,c3,59,d0,39,35,02 
09,48,865,02,2d,82,20,c9 
41,d0,16,a9,42,8d,02,20 
a2,0de,ad,le,20,0c,.5,88 
71,30,15,20,1e,ab,c,4a 
0a,29,41,8d,02,20,a2,de 
ad, le,20,0c,e5,a9,6b,a® 
15,28,l1e,ab,4c,4a,Ba,cS 
43,d8,03,4c,F7,0b,c9,41 
dß,03,4c.,d6,12,c9,51,d8 
13,20,e9,0b,ad,18,d0,23 
fd,8d,18,d0,39,09,20,d2 


2437? 
2164 
2452 
1917 
1840 
2256 
2384 
2327 
1818 
2434 
1863 
2230 
2172 
2358 
2277 
2108 
2178 
2638 
1973 
2197 
2042 
2303 
246B 
1986 
2140 
2653 
2357 
2094 
2433 
1968 
2493 
2153 
2202 


SER 


2122 
2282 
2197 
1985 
2os2 
2272 
2324 
2443 
1875 
2355 
2246 
2317 
2135 
2238 
2503 
2046 
2218 
2588 
2335 
2406 
2131 
2385 
2392 
2214 
22308 
2526 
2063 
1805 
2339 
2030 
2245 
2334 
2356 
2397 
2456 
2084 
2426 
2354 
2006 
2384 
2432 
2424 
2420 
1856 
2393 
2484 
2466 
2168 
2175 
2108 


223 data 
230 data 
231 data 
232 data 
233 data 
234 data 
235 data 
236 data 
237 data 
238 data 
239 data 
240 data 
241 data 
ey2 data 
243 data 
244 data 
E45 data 
246 data 
247 data 
248 data 
2439 data 
250 data 
251 data 
852 data 
853 data 
254 data 
855 data 
2556 data 
257 data 
258 data 
259 data 
268 data 
261 data 
262 data 
263 data 
264 data 
865 data 
266 data 
2867 data 
268 data 
869 data 
270 data 
271 data 
272 data 
273 data 
274 data 
275 data 
276 data 
277 data 
27B data 
279 data 
280 data 
261 data 
282 data 
283 data 
284 data 
285 data 
286 data 
287 data 
268 data 
289 data 
290 data 
291 data 
232 data 
293 data 
294 data 
295 data 
296 data 
297 data 
298 data 
299 data 
308 data 
301 data 
302 data 
303 data 
304 data 
305 data 
306 data 
307 data 
308 data 
303 data 
318 data 
311 data 


Ef ,4c,94,e3,c9,45,d0,da 
a9,00,85,02,20,e9,0b,ic 
45,08,4c,4a,03,20,cc, FF 
83,0f,20,c3,ff,39,02,208 
c3,FFf,60,a2,03,20,Ff,eS 
eB,ed,12,d0,f8,29,00,85 
fb,89,20,85,fc,e6,fc,a® 
00,18,69,21,aa,29,00,51 
£b,c8,dd,fb,e6,fc,e4,fc 
d®d,f5,a2,13,a0,01,20,0c 
e5,39,15,a0,16,28,le,ab 
a2,14,20,01,28,0c,e5,a5 
47,80,16,20,le,ab,ad,15 
a0,901,20,0c,e5,89,73,8® 
16,20,le,ab,a2,16,20,01 
20,2c,e5,a9,a4,30,16,208 
le,ab,aP,17,a0,01,29,0c 
e5,39,d3,30,16,28,1e,ab 
a2,01,30,01,20,0c,e5,aS 
52,a0,17,28,le,ab,a2,9a 
a80,00,20,0c,25,a9,cd,a2 
28,20,d2,ff,ca,död,fa,aS 
12,85,4d,39,21,55,4e,a9 
31,84,88,15,89,00,85, fd 
a9,20,85,fe,a5,"d,0a,35 
b9,082,17,8d,88,15,c8,bS 
00,17,8d,Bf,15,a5,4e,da 
a8,b9,28,17,84,91,15,c8 
b9,00,17,84,92,15,e5, fe 
29,71,13,85,fb,c9,08,F®8 
2d,85,4d,a5,fc,c9,ff,f® 
05,85,4e,4c,38,0c,a5,008 
85,£b,39,20,85,fco,e6,fc 
a5,Fd,38,e9,28,85,Fd,f®8 
06,80,03,b1,Fd,F9,F1,a3 
07,8d,86,02,a2,02,20,07 
29,0c,e5,20,Fd,11,18,a9 
20,65,fb,85,fb,a2,0b,38 
07,20,00,e5,20,fd,11,18 
a9,20,65,Fb,85,fb,a2,0c 
a0,07,20,0c,85,20,Ffd,11 
18,39,20,65,fb,85, fb,a2 
0d,a8,07,28,00,e5,20,Ffd 
11,18,a9,20,65,Fb,85,fb 
a2,08e,a0,07,20,0c,e5,20 
£fd,11,18,89,20,65,Fb,85 
fb,a2,0f,a0,07,20,0c,e5 
20,Fd,11,18,89,20,65,Fb 
85,fb,a2,10,20,07,28,0c 
e5,20,Fd,11,18,89,28,65 
fb,85,Ffb,a2,11,a0,07,20 
0c,e5,20,fd,11,89,00,85 
fb,20,e4,Ff,£f®,fb,c9,56 
d0,83,4c,46,10,c9,11,d® 
06,20,b9,0Ff,4c,75,0d,c8 
91,d0,06,20,02,18,4c,75 
0d,c9,1d,d0,06,280,02,10 
4c,75,0d,c9,53,d8,83,“4c 
Se,9e,c9,52,d0,03,4c,la 
oF,c9,42,d80,03,4c,d5,18 
c3,50,d0,03,4c,4a,0f,c9 
55,d9,03,40,6d,0f,c3,4d 
d®,03,4c,90,0F,c9,41,d® 
83,4c,60,11,c9,35,F0,2d 
c9,36,f0,29,c9,37,£90,25 
c9,38,F8,21,c9,2b,F8,5F 
c9,2d,F8,5b,c9,2a,f0,57 
c9,3d,F0,53,c9,5e,f®,4f 
38,e9,30,c9,05,90,03,'c 
75,0d,4c,9b,90Ff,38,e9,35 
48,a2,08,30,17,20,0c,e5 
6B,a0d,de,da,da,aa,a9,ad 
91,fb,c8,20,d2,Ff,bd,7b 
17,91,fb,20,d2,Fff,e8,cB 
bd,7b,17,91,Ffb,20,d2, ff 
e8B,c8,bd,7b,17,91,fb,20 
d2,Ff,e8,c8,bd,7b,17,91 
Fb,28,d2,ff,4c,75,0d,c9 
Se,dd,02,39,c0,48,a5, fd 
18,69,20,90,02,86,Fe,85 
fd,a9,20,18,69,13,c5, fe 
dd,2e,a5,fd,38,e9,28,b8 
02,c6,Ffe,85,fd,4c, 75,0d 
20,1b,15,a8,00,39,88,31 
Eb,c8,a9,12,91,fb,c8,a9 


ERFERE SO METTIR BE RENBORLLNNE 


01,91,Fb,c8,68,91,fb,cB 
c8,13,d0,£f9,39,00,Si1,Fb 
c8,c®,1e,d0,F9,a2,da,a8 
07,20,0c,e5,20,fd,11,4c 
75,8d4,280,00,b1,fb,29,48 
£0,03,40,75,0d,a5,fc,c5 
fe,30,de,F0,03,4c,75,0d 
a5,Ffd,c5,fb,b0,03,4c,75 
2d,38,00,b1,Fb,29,0F,F® 
03,20,F3,de,20,d4,14,a5 
fd,38,e9,28,b8,82,c6,fe 
85,Ffd,35,fb,18,69,e0,58 
02,e6,Fc,85,fb,a2,11,38 
07,20,0c,e5,20,fd,11,a5 
fb,38,e9,e8,b8,02,c6,fc 
85,fb,4c,75,0d,a2,0F,20 
c9,Ff,a9,53,20,d2,ff,a3 
3a,20,d2,ff,a0,03,b1,fb 
20,d2,fFf,c8,c0,13,d0,Ff6 
20,cc,ff ,4c,4e8e,13,80,23 
a2,80,b1,fb,9d,08,1f,e8 
c8,e8,10,d0,F5,a9,0a3,85 
4b,39,00,85,4c,29,10,85 
490,20,ad,13,30,03,a2,20 
bd,08,1F,91,fb,e8,c8,e® 
10,d0,F5,4c,75,0d,a8,208 
b1,Fb,09,c0,91,fb,ad,97 
05,09,80,84,37,05,ad,58 
05,09,80,84,98,05,2d,99 
05,09,80,84,99,05,4c, 75 
0d,a0,08,b1,fb,29,bf,S1 
Eb,ad,37,05,29,7F,84,97 
05,8d,38,05,29,7F,8d,398 
05,2d,99,05,29,7F,8d,399 
05,4c,75,0d4,85,02,28,F® 
093,80,85,02,4c,45,08,a8 
00,aa,b1,Fb,23,F0,03,80 
S1,Fb,8a,18,71,Fb,91,Fb 
a2,93,30,07,20,0c,e5,20 
fd,11,4c,75,0d,a2,20,e8 
e4,Fc,30,07,a2,00,et4,Ffb 
90,01,60,c6,fc,a9,03,85 
4b,a2,11,86,4c,e8,8a,38 
e5,4b,85,40,a9,07,85,4d 
a9,20,85,4e,82,01,20,6a 
14,32,03,30,07,20,0c,e5 
a6,fc,ca,ed,20,39,83,20 
£d,11,a5,fb,18,69,e0,90 
02,e6,fc,85,fb,60,a5, fc 
c5,fe,30,23,f0,01,60,85 
Fb,c5S,fd,90,01,60,86, fc 
a9,03,85,4b,a2,11,86,4c 
e8,8a,38,e5,4b,85,40,89 
07,85,4d,29,20,85,4e,a2 
00,20,68,14,a2,11,30,07 
28,0c,85,20,fd,11,a5,fb 
38,e3,e8,b8,02,c6,fc,85 
fb,60,32,01,30,0d,20,0c 
e5,20,fd,11,380,800,bi1, Fb 
993,00,1F,c8,c0,20,d0,F6 
20,d4,14,35,Ffb,18,69,e8 
90,02,86,fc,85,fb,a2,11 
a8,07,28,0c,e5,20,fd,11 
a5,fb,38,e9,e2,b2,02,c6 
£c,85,Ffb,20,e4t,Ff,Fß,fb 
c9,11,d0,06,20,b9,2Ff,4c 
7F,180,c9,1d,d0,06,20,02 
18,4c,7£,180,c9,91,d0,86 
20,02,10,40,7F,10,c9,0d 
d®,d39,20,1b,15,a80,00,b9 
00,1F,9S1,fb,c8,c®,28,d® 
£f6,a2,03,a0,907,20,0c,e5 
20,£d,11,a2,01,80,0d4,28 
0c,e5,a9,20,30,00,20,d2 
FF,c8,c0,1a,d8,f8,H4c,75 
0d,a2,0a,a0,1e,20,0c,e5 
a9,a0,20,d2,FFf,29,d2,Fff 
20,d2,Ff,a0,00,38,39,20 
1Ff,c8,c0,03,d80,F8,89,0da 
85,4b,a9,1e,85,4c,a9,03 
85,408,20,8d,13,89,00,85 
29,85,72,8d,05,1F,8d,86 
1F,39,01,85,28,30,02,84 
Ye,a4,4e,b9,00,1f,38,e9 
30,930,23,c9,0a8,b9,1f,85 
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71,20,57,b3,83,18,6d,05 
1F,84,05,1F,98,6d,06,1F 
8d,06,1Ff,a9,04,85,71,28 
57,b3,86,28,84,29,c6,4e 
10,cf,ad,805,1F,30,1c,31 
Fb,cB,ad,86,1Ff,51,fb,a2 
08,a0,07,20,0c,e5,20,fd 
11,40,75,2d,89,00,85,Fb 
a9,20,85,Ffc,a9,00,85,4e 


a a2,0F,20,c9,Fff,a8,00,b9 


94,15,F0,06,20,d2,FFf,c8 
d®d,f5,208,cc,FFf,20,48,13 
e6,fc,a2,02,20,c9,FFf,a9 
12,86,fc,e4,fe,d0,02,a9 
008,20,d2,FFf,a6,4te,bd,ci 
17,a6,fc,e4,fe,dd,02,a9 
£f,20,d2,Ff,a0,00,b1,Fb 
20,d2,Ff,c8,cd,fe,dd,Ff6 
20,cc,Ff,a9,32,84,88,15 
a9,31,8d,8e,15,29,38,8d 
8F,15,a5,4e,e6,4e,da,aa 
bd,9d,17,8d,91,15,e8,bd 
9d,17,8d,92,15,a2,0F,20 
c9,ff,a0,00,b9,87,15,F® 
06,20,d2,FFf,c8,dd,FfS5,20 
cc,ff,20,48e,13,85,fc,c5 
fe,F8,03,4c,6c,11,4c,90 
0F,a0,03,b1,Fb,d0,01,68 
a0,00,b1,Ffb,d®,04,a2,0F 
d®,2b,aa,29,40,F0,05,a9 
12,20,d2,FF,Ba,29,0F,c9 
00,d0,02,82,00,c9,01,d® 
02,22,03,c9,02,d0,02,a2 
06,c9,03,d0,02,22,09,c9 
04,d0,02,22,0c,bd,8b,17 
20,d2,ff,e8,bd,8b,17,20 
d2,ff,e8,bd,8b6,17,20,d2 
ff,a9,92,20,d2,ff,a9,20 
20,d2,Ff,20,d2,Ff,a2,10 
86,d8,30,03,b1,fb,28,d2 
FFf,c8,c0,13,d0,F6,39,20 
20,d2,Ff,20,d2,FFf,ad,ic 
bl,fb,aa,c8,bl,fb,a8,d® 
11,e8,64,b8,0c,89,20,20 
d2,Ff,e®d,03,b0,03,20,d2 
£f,38,20,cd,bd,60,20,89 
0b,60,85,fb,85,4d,a5, fc 
85,4e,a0,20,b1,4d,aa,98 
38,e9,20,38,83,91,4d,18 
98,69,20,38,c8,cd,408,d® 
eb,a5,4d,18,69,20,90,02 
e6,4e,85,4d,a5,Ffe,c5,"4e 
b®,d8,a5,Fd,38,89,20,b® 
02,c6,fe,85,fd,a6,fe,a® 
00,690,a5,02,23,40,d0,da 
a9,00,85,02,20,89,0b,4c 
45,08,a2,0Ff,20,c9,Ff,a0 
80,69,94,15,c09,00,F0,07 
80,d2,Ff,c8,4c,ed,12,20 
cc,ff,20,48,13,22,02,20 
c9,ff,a0,00,b9,00,20,20 
d2,Fff,c8B,d®,F7,20,cc, ff 
a2,0f,20,c9,ff,a9,32,8d 
88,15,a9,31,8d,8e,15,a9 
38,8d,8F,15,a9,30,8d,91 
15,8d4,92,15,30,00,b9,87 
15,F0,07,20,d2,ff,c8,“4c 
32,13,20,cc,ff,20,4e,13 
a9,00,85,02,20,e3,0b,4c 
45,08,89,00,85,30,29,0B 
20,b4,FFf,a9,6f,20,36,Ff 
20,a5,fFf,c9,380,£0,8b,20 
eab,ff,68,68,20,e9,0®b,“c 
45,08,4c,ab,ff,a9,31,8d 
88,15,a2,0f,20,c9,ff,a8 
00,b9,87,15,f0,06,28,d2 
ff,c8,d0,f5,20,cc,Ff,20 
4e,13,82,02,20,c6,ff,20 
cf,Ff,85,fb,20,cf,Ff,BS 
Fc,a0,00,20,cf,Ff,91,fd 
c8,c0,fd,dd,Ff6,20,cc,ff 
60,89,00,85,3F,36,4b,a4 
4c,20,0c,e5,20,35,14,20 
e4,ff,F®d,fb,c9,9d,fd,4d 
c9,91,F0,3F,c9,13,f®,3b 
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IST Terme Praxis Listing rasante 


c9,14,F0,75,08,93,F0,33 
c9,94,F0,66,c9,11,£0,35 
c9,0d,F0,51,a6,3f,e4,40 
F®,d5,84,3F,85,ce,a6,d8 
d®d,04,c9,1d,F®,05,85,ce 
99,00,1F,20,35,14,e6,3F 
85,ce,20,d2,Fff,20,35,14 
“4c,bb,13,36,d8,d0,23,4c 
bb,13,4c,e0,13,36,d8,Fd 
02,d0,c9,a6,3f,e0,00,Ff® 
9e,a9,9d4,85,ce,20,35,14 
c6,3f,a5,ce,20,d2,ff,20 
35,14,4c,bb,13,20,35,14 
60,a4,d3,b1,d1,49,80,51 
d1,69,a2,201,86,d8,4c,bb 
13,86,d8,F0,03,4c,20,13 
20,35,14,a6,4b,a4, 40,28 
0c,25,20,35,14,36,40,ca 
a93,a80,3d4,808,1F,20,d2, FF 
ca,10,f5,4c,ad,13,a5,ac 
48,35,ad,48,a5,ae,48,a5 
af ,4B,e0,00,d0,16,a6,"b 
c6,40,F0,26,20,F0,.29,e8 
bd,F®,ec,85,ac,b5,d9,20 
ba,14,30,ec,36,4c,c6,'4® 
F®,10,20,F®,e9,ca,bd,f® 
ec,85,ac,b5,d9,20,ba,14 
30,ec,a4,4e,20,F0,e9,20 
24,ea,39,20,91,d1,88,c4 
4d,10,F9,4c,58,e9,29,03 
2d,88,02,85,ad,20,e08,89 
a4,Ne,bl1,ac,91,di1,bil,ae 
91,F3,88,c4,4d,10,F3,68 
a5,Ffc,85,40,85,4e,85,4e 
85,4b,a5,Fb,85,4b,18,63 
20,30,02,e6,4e,85,4d,a® 
88,b1,4d,91,4b,c8,d0,F9 
e6b,Ne,86,4c,a5,fe,c5,4c 
b®d,ef,a9,08,85,4b,a2,11 
86,4c,e8,83,38,8e5,4b,85 
40,89,07,85,4d,a9,20,85 
Ye,82,00,20,68,14,60,a5 
fe,85,40,85,4e,a5,fb,85 
4b,18,69,20,90,02,e6,'te 
85,4d,a0,ff,b1,4b,91,4d 
88,c0,Ff,d0,F7,c6,4c,c6 
Ye,a5,4c,c5,fc,b®d,ed,aö 
1d,29,00,91,Fb,88,10, Fb 
a9,83,85,4b,a2,11,86,4c 
eB,83,38,85,4b,85,40,a8 
07,85,4d,89,20,85,4e,a2 
01,20,68,14,60,49,23,9e 
He,45,49,4e,00,9e,20,4a 
41,20,00,9e,42,45, 40,45 
47,54,00,98,20,46,52,45 
49,20,00,55,31,3a,32,20 
30,20,31,38,20,30,30,08 
42,2d,50,38,32,20,38,00 
4d,2d,57,01,01,01,41,00 
20,20,39,c3,1e,41,54,41 
Nc,4f.,47 20,88,04,49,52 
45,43,54,4f,52,59,29,20 
42,45,41,52,42,45,49,54 
45,4e,20,20,20,00,1d,20 
99,c5,1e,49,4e,4c,45,53 
45,4e,20,20,20,99,c1,l1e 
42,53,50,45,49,43,48,45 
S2,4e,20,20,20,20,39,d1 
1e,55,49,54,00,20,20,20 
20,20,20,20,20,20,20,208 
20,20,20,20,20,20,208,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
00,1e,c6,49,40,45,54,59 
50,33,20,99,30,1e,3d,cH 
c5,00,20,99,31,1e,3d,d3 
c5,d1,28,99,32,1e,3d,d® 
d2,c7,20,99,33,1e, 3d, dS5 
d3,d2,20,99,34,1e,3d,de 
c5,cc,28,cc,41,44,45,4e 
20,20,33,20,39,35,1e,3d 
2c,38,3a,20,99,36,1e, 3d 
38,20,31,20,99,37,1e,3d 
38,20c,32,20,99,38,1e,3d 


38,2c,30,20,20,20,08,d4 
52,45,4e,4e,45,4e,3a,208 
99,2b,1e,20,2b,2b,2b,28 
99,2d,1e,20,2d,2d,2d,28 
99,2a,1e,20,2a,2a,23,20 
99,3d,1e,20,3d,3d,3d,208 
99,58e,1e,20,c0,c0,c0,0® 
c2,45,46,45,48,4c, 45, 3a 
20,39,d3,1e,43,52,41,54 
43,48,20,99,d2,1e,45,4e® 
41,4d,45,28,99,c2,1e,4c 
4f,43,4b,53,28,39,d8,1e 
52,4F,54,45,43,54,88,c2 
45,45,45,48,40,45, 33,28 
99,d5,1e,He,58,52,4F,54 
45,43,54,20,20,99,cd,1e 
45, 4e,55,45,20,20,39,c1 
1e,42,53,50,45,49,43,48 
45,52,4e,00,380,30,30,31 
30,32,30,33,30,34,30,35 
30,36,30,37,30,38,30,39 
31,30,31,31,31,32,31,33 
31,34,31,35,31,36,31,37 
31.,38,31,39,32,30,32,31 
32,32,32,33,32,34,32,35 
3236,38, 37,32,38,32,39 
33,30,33,31,33,32,33,33 
33,33, 39, 39,33, 36,33,32 
33,38,33,39,34,30,99,d6 
1e,45,52,53,43,48,49,45 
42,45,4e,dd,20,20,20,28 
20,20,20,20,20,20,20,20 
20,20,20,29,20,20,20,20 
20,20,20,20,20,20,00,2c 
38,3a,30,2c,38,2c,31,2c 
38,2c,32,2c,38,2c,30,cH 
e5,cc,d3,c5,d1,d®,d2,c7 
dS,d3,d2,d2,cS,cc,2d,2d 
2d,30,31,30,34,30,37,31 
30,31,33,31,36,30,32,3® 
35,30,39;317,31, 31 , 34,31 


44,20,5d,28, 
20,20,20,20, 
20,20,20,20, 


49,40,40,40,40,40,40,40 
49,40,71,49,40,40,40,40 
49,40,40,49,40,40,40,4D 
40,40,40,40,40,40,40,40 
40,40,40,40,40,7d,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,28,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
70,48,40,40,40,40,49,40 
490,40,40,490,49,40,490,40 
49,40,40,40,40,6e,20,70 
49,40,40,490,40,40,40,40 
49,40,40,6e,20,20,20,20 
5d,20,20,44,09,13,0b,20 
2d,20,4b,0F,04,0d,05,2e 
14,01,12,20,20,5d,20,5d 
20,20,20,42,60,41,50,'d 


20 
20 
20 
20 


2044 
1948 
2127 
2257 
2127 
2208 


‚20,20 
‚20,208 


29,20,20,5d,20 
6b,49,40,40,40 
40,490,40,40,40, 
490,490,40,40,40, 
490,40,40,40,40, 
40,40,40,7d,20, 
5d,20,20,20,2 


£ennunmn 
888.998 


‚e0,6d 


ERNUNDNEIE 


8860298 


’ 
D 
. 
’ 
’ 
’ 
’ 
’ 


..- oe... 


20 
9 o, 
49,49,40,40,40,40,40,40 
49,49,40,40,490,73,20,70 
49,40,40,40,40,40,40,40 
49,490,40,6e,20,29,20,20 
5d,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,5d,20,5d 
20,20,50,12,0F,14,05,03 
14,20,20,5d,20,20,20,20 
66,40 ,40,40,40,40,40,40 
40,40,40,40,40,40,40,4® 
48,490,40,40,49,73,20,6b 
49,40,40,40,40,40,40,40 
40,49,40,73,20,20,20,20 
5d,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,5d,20,5d 
20,20,20,20,20,20,20,20 
20,20,20,5d,20,20,20,20 
64,49 ,40,40,40,40,40,40 
49,40,40,49,40,42,40,40 
49,40,40,40,40,7d,20,6d 
40,40,49,40,40,40,40,40 
40,40,40,7d,20,20,20,20 
20,20,20,20,20,28,20,20 
20,20,20,20,20,20,20,20 
20,20,20,20,20,20,20,20 


nn 
so 
nu 
m 
© 
m 
© 


BSSSSBBBRHEBRBRBRBBBBBBUSSSEEHESSEES 


SIBBSSISI IE HELBBBBBBBE 585555555 


nn nu 
86868 
nn 
oo 


SBSOHSBSSERBSBTSESEEEE855 


PH 


SSISIBBRRFRBBBBBBB385555555 555 


SIEBBSSSBSSBEBESSEESS 


SAHHBSBIHRSSEHEESESS 


SSIBIEHHABEBIBIEBENB585558885558 5 


nnm 


0,20,20,28 
‚20,20,20,20 
20,20,20,20,20,5d,64,40 
40,40,40,40,40,40,40,40 
40,40,40,40,40,40,40,40 
40,40,40,49,40,40,42,40 
49,40 ,40,40,40,40,40,40 
49,40,49,40,40,7d 


„DM“ verschönert das Directory und fügt Ladehilfen (,8:) an. 
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xis Listing seems u 


Komfortabel mit 
SHAED 


System: C16/Printer 
Typ: Anwendung 


— Shapes punktweise am Bild- 
schirm entwerfen. Zeilen- und 


Shapes eröffnen fast 


Sprache: Basic . - rigen Spaltenanzahl ist bis 25 x 40 
die gleichen Möglich 

Ein Shape in hochauflösender WOW ZEHN — Shape-Entwurf spiegeln. 

Grafik zu entwerfen, ist pro- sind einfach zu nutzen — Das fertige Shape auf Diskette 


grammtechnisch ziemlich aufwen- £ 2 = Seh oder Band speichern. 

dig. Schön wäre ein Shape-Editor, und mit leistungsfähi- — Das fertige Shape in DATA- 
mit dem man ein Shape ohne Pro- gen Befehlen ausgerü- Statements umwandeln und in 
grammiererei Pixel für Pixel di- ; dieser Form speichern. 

rekt am Bildschirm entwerfen und stet. SHAED erleich- — Ein Shape von Diskette oder 
anschließend auf Diskette oder An EDERSIE Des zu er- Band laden und editieren. 
Band speichern könnte. SHAED Als Anregung für Entwürfe wurde 
ist ein solcher SHAPE-EDITOR. In stellen. ein Shape gezeichnet und in 
Heft 4/1985 ist ein ähnliches Pro- DATA-Statements abgelegt. 
gramm erschienen. Dort wurdees C16/116 mit Speichererweite- Listing 3 zeigt „Alien“, das kleine 
Shape-Lupe genannt. Die jetzige rung. Männchen vom anderen Stern. 
Version ist wesentlich komforta- SHAED (Listing 1) bietet folgende ANWENDUNGSHINWEISE 

bler. Man benötigt jedoch einen Optionen: Nach dem Programmstart wird 


rem shape zeigen 
graphic 1,1:3-3072:zl-zl-1:sp=sp-1 


graphic 1,1:graphic 8,1l:trap 1040 
resume next 
print ”"Cdown] [Ervs]shape-editor:[down] 


print ”[Cdown]) 1-entwerfenl2spaces]d- 
editieren” 

get key kS$:if kS$<"1” or k$>"”2" then 
19068 

scnclr :if k$="2" then 1960 

print "[down) z=punkt setzen” 

print "” l=punkt loeschen” 

print ” b=beenden” 

print "Cdown] leertaste=-shape zeigen 
Cdown]” 

print " m=shape spiegeln” 

print " s=-speichern” 

print "” d=datagenerator” 

input ”[down]) wieviele spalten ";sp 
input " wieviele zeilen[2spaces)]";zl 
if sp>4® or zl>25 then 11608 


rem raster zeichnen 

dim r(zl,sp),p(sp,zl):a=-3071:scnclr 
for z=1 to zl:for s*1 to sp 
r(z,s)=-46:poke a+ts,46 

next :a=-a+4Qd:next 


rem shape entwerfen 
a=-3071:x=-1:y*1:goto 1388 

get key u$ 

p-atx+(y-1)*48:poke p,r(y,x) 

if q$=-"[down]” then y*y*+l:if y>zl then 
y1 

if q$=-"[up]" then y=y-l:if y<i then y= 
zl 

if q$="[right]” then x=x+1:if x>sp 
then x=1 

if q$=-"[left]” then x=x-l:if x<1 then 
x=sp 

if q$5=-"1l” then r(y,x)=46:Fl=-1 

if q$5=-"z" then p=-Bl:r(y,x)=p:fl=-1 

if q$=-"b" then 21508 

if q$=-"” ” then 14208 
p*-a+tx+(y-1)*48:poke p,r(y,x)+128 

goto 1288 
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for z=® to Zl:for s=B to sp 

if peek (a+s)<>46 then draw 1,s,z 

next :a=a+4ßd:next :sshape a$,0,8,sp,zl 
get key k$:zl-zl+l:sp=sp+1 

if k$=-"m” then 1608:else graphic ® 

if k$<>”s” and k$<>”d" then 1270 

if k$=-"d” then 17608 


graphic ®,1:input ”[Cdown] shape-name " 
‚n$ 


rem shape-a$ als usr-file speichern 
l-len (a$):open 2,8,2,n$+",u,w":fl=2 
print#2,1:for i=1 to 1 

print#2,asc ( mid$ (a$,i,1)) 

next :close 2:sp=-sp-1:z1*zl-1:goto 
2060 


rem bit-map spiegeln 

sp=-sp-l:zl-zl-1 

rem bildschirm ausschalten 

poke 65286, peek (65286) and 239 

for y"® to zl:n=d:for x=sp to ® step - 
1 


locate x,y 

if rdot (2)=1 then p(n,y)=1l:goto 1670 
p(n,y)=® 

n=-n+l:next :next 

rem bildschirm wieder einschalten 
poke 652B6,peek (65286) or 16:scnelr 
For y"® to zl:Ffor x=® to sp 

if p(x,y) then draw 1,x,4 

next :next :sshape b$,0,2,sp,zl 
gshape a$,50,8:get key k$:goto 2068 


rem datagenerator 

if Fl<>2 then F=3:goto 2150 
az-2300:graphic ®,1 

print az+4ßd”data” len (a$):d=-1:k=® 
do 

n=®: print az+50+k”data "; 

do while d<len (a$) 

gosub 1928:print b$”,"”;:d=d+1:n=n+1 
if n=7 then exit 

loop 


Praxis Listing: 22: Soma JarsuEnnan ur 


1850 gosub 1928: print b$:d=-d+1:k=k+12 1728 2108 r(z+1,s+1)=d:poke a+ts,d 1926 
1860 loop while d<len (a$) 865 21l® next :a=a+4Qd:next 605 
1878 print az”rem shape-"n$ 1531 2128 sp=-sp+1:zl-=-zl+1:goto 1278 2457 
1880 print az+lß"reada: fori=itoa"” 2489 2130 : 
| 1838 print az+20"readb:b$=chr$Cb)” 1937 2148 rem sicherheitsabfrage 
| 1908 print az+30"a$-a$+b$:next"” 1819 2150 graphic 1:18=-"[6spaces]”:1$-1$+1$ 1964 
1918 end 128 2160 1$-1$+1$:e$=-"wirklich beenden-)/n" 3368 
1920 b-asc ( mid$ (a$,d,1)):b$=str$ (b) 1679 2178 w$="shape nicht gespeichert!” 2064 
19308 b$*-right$ (b$, len (b$)-1):return 1542 2188 d$="d)ata oder s)speichern?" 2398 
1940 : 2190 if Fl<>2 then char 1,10,8,w$ 1888 
1950 rem shape von diskette laden 2208 if f=-3 then char 1,10,9,d$:goto 2228 2357 
1968 input "[clr,down) name”; n$:scnclr : 2208 22108 char 1,10,9,e$ 1012 
graphic 1,1 2220 F=O®:get key k$ 889 
1978 open 3,8,3,n$+",u,r":c$-"" 2300 22380 if k$="j” then graphic B®,1:end 1846 
1388 input#3,1:for il to 1 1861 2240 For i=8 to 9:char 1,10,i,18$:next 1945 
1990 /Äinput#3,c:c$=c$+chr$ (c) 1488 2258 if k$="s" then 1518 1549 
2000 next :close 3:gshape c$,0,0 1487 2260 if k$=-"d"” then 1770 1697 
2010 sp-asc ( mid$ (c$,1-3,1)2) 1604 2278 graphic B:goto 1270 944 
20208 zl=-asc ( mid$ (c$,1-1,19) 1571 Berl : 
2030 dim r(zl+1,sp+1),p(sp+1,z1+1) 2970 Be72-.ren ++--- rn nn nn 
20O4B : 2273 rem aenderungen Fuer datasette: 
2050 rem entuwurf zeigen 2274 rem zeile 1548 - 
2060 a-3072:graphic 2,1 1269 2275 rem 1548 1l-len(a$):open2,1,1,n$:fl=-2 
2078 for z=d to zl:for s=-®d to sp 1663 2276 rem zeile 1978 -> 
2088 locate s,z 782 2277 rem 1978 open 3,1,8,n$:c$-=""” 


2330 if rdot <er=t then Bl aaa 2877 A BED Een er 


Listing 1: Komfortabel und einfach: SHAED 


gefragt, ob ein Shape entworfen 
oder editiert werden soll. 

Soll ein Shape entworfen werden, 
so erscheint zur Erinnerung die 
Bedienungsanleitung am  Bild- 
schirm. 

Dann sind Zeilen- und Spaltenzahl 
der Raster für den Entwurf einzu- 
geben. Maximal sind das 25 Zei- 
len und 40 Spalten, das heißt der 
ganze Bildschirm. 

Nachdem das Raster gezeichnet 
wurde, erscheint der Cursor. Er 
wird, wie gewohnt, mit den norma- 
len Cursor-Tasten gesteuert. Das 
Raster kann mit dem Cursor nicht 
verlassen werden. Eine TRAP-An- 
weisung sperrt die STOP-Taste. 
Deren versehentliche Betätigung 


kann daher keinen Schaden an- 
richten. 
Mit Taste Z setzt man an der Qur- 


“sor-Position einen Punkt. Mit L 


wird ein bereits gesetzter Punkt 
wieder gelöscht. 

Ein Druck auf die Taste B beendet 
das Programm. Wurde der Ent- 
wurf nicht gespeichert, so ist er 
verloren! Es erfolgt vorher eine Si- 
cherheitsabfrage. 

Mit der Leertaste wird auf den Gra- 
fik-Bildschirm umgeschaltet und 
der Shape-Entwurf dorthin über- 
tragen. Er zeigt das Shape in Na- 
tura. Ein neuerlicher Druck auf die 
Leertaste schaltet auf den Text- 
Bildschirm zurück und es wird 
weiter entworfen oder editiert. 


Der fertige Entwurf wird auf Dis- 
kette oder Band gespeichert. Die- 
sen Vorgang startet man aus dem 
Grafikmodus heraus mit Taste S. 
Im Listing stehen die für die Flop- 
py gültigen Befehle. Für die Ver- 
wendung einer Datasette müssen 
zwei Zeilen korrigiert werden. Sie 
sind am Ende des Listings ange- 
führt. 

Oft ist es günstiger, den Shape- 
String in DATA-Statements zu ver- 
wandeln, weil man die Datas in ein 
anderes Programm einbauen will. 
Auch diese Option wird im Grafik- 
modus gestartet. Die generierten 
DATA-Zeilen stehen allerings nur 
am Bildschirm und werden mit 
der RETURN-Taste in das Pro- 


open 6,4,6:print#6,chr$ (21):close 6 
open 4,4 

a=-3072:Ffor z=® to &4:for s=® to 48 
if s=-48 then print#4,” ":goto 418 
p"-peek (a+s) 
if p=32 then 
if p=-46 then print#4,"."; 

if p=81 then print#4,”0”; 

next :a=a+4Qd:next :close 4:end 


print "Celr,down] welcher drucker:” 
print "[down] 1= 881,803, 1525,gp190” 
print "Cdown] 2= 802,1526":get key k$ 


print#4," "; 


rem shape von diskette laden 

input "Cclr,down] name”; n$:scnclre : 
graphic 1,1 

open 3,8,3,n$+"”,u,r":c$=-""” 
input#3,1:for i-1 to | 
input#3,c:c$=c$+chr$ (c) 

next :close 3:gshape c$,0,0 

sp-asc ( mid$ (c$,1-3,19) 

zl-asc ( mid$ (c$,1-1,12) 

dim r(zl+1,sp+1):a=-3071:graphic 8 

for z=-® to zl:for s=-d to sp:locate s,z 
if rdot (2)=1 then d-Bl:else :d=46 
r(z+l1,s+l)=d:poke a+s+1l,d 

next :a=a+4Qd:next :if k$="1" then 440 


rem hardcopy mit typ #1 

open 4,4:s$=chr$ (15):g$=chr$ (B) 
a=-3072:for z=® to 24:for s-® to 48 
if s=-48 then print#4,” ”g$:goto 510 
p"-peek (at+ts):print#4,s$; 

if p=32 then print#4,"” ”; 

if p=46 then print#4,"."; 

if p=-8B1 then print#4,"0”; 

next :a=a+4d:next :close 4:end 


rem fuer datasette muss 

rem zeile 1808 geaendert werden: 
: rem 188 open3,1,8,n$:c$=""” 

rem hardcopy mit typ #2 


>» 
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Listing 2: Unser „Alien“ (nächste Seite) wurde mit diesem Programm gedruckt 


BUHU EN DB LIND LESE IR 


EEE LETTER UNETTE PPAKIS Listing essmeser museum eg 


gramm übernommen. Bei langen 
Shape-Strings kommt man mit ei- 
nem Bildschirm nicht aus. In ei- 
nem solchen Fall den Datagenera- 
tor mit GOTO 1760 nochmals star- 
ten. Wenn der Bildschirm voll ist, 
mit STOP-Taste abbrechen und 
die fehlenden Zeilen mit RETURN 
übernehmen. Wenn die DATA- 
Zeilen komplett sind, wird der 
SHAPE-EDITOR mit DELETE-2290 
gelöscht; das generierte Lade- 
Programm bleibt zur weiteren 
Verwendung übrig. 

Wenn man vom Entwurf eine 
Hardcopy zur Dokumentation 
möchte, so geht das mit dem 


HARDCOPY-Programm (Listing 2). 
Es ist für alle Commodore-Druk- 
ker und die dazu kompatiblen Mo- 
delle geeignet. Zur Anwendung 
des HARDCOPY-Programmes 
braucht man ein bereits gespei- 
chertes Shape. Der Lade-Befehl 
ist wieder für die Floppy ausge- 
legt. Für die Datasette gibt es am 
Ende des Listings ebenfalls eine 
Korrekturzeile. 

Manchmal findet man in einem 
Grafik-Programm ein Shape, wel- 
ches man modifizieren und dann 
in ein eigenes Programm einbau- 
en will. Dazu muß man feststellen, 
in welcher Variablen das Shape 


read a: 


data 
data 
data 
d data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


104 


83;°° ®..08.....a0e.. 


gespeichert wurde, und speichert 
es mit dem im SHAPE-EDITOR ab 
Zeile 1540 verwendeten, Algorith- 
mus ab. Dazu braucht man das 
Original-Programm nicht zu verän- 
dern, denn solange kein RUN ein- 
gegeben wurde, bleiben die Va- 
riablen erhalten. Es genügt daher, 
nach Ablauf des Original-Pro- 
grammes zuerst NEW und dann 
die vier Zeilen der Save-Routine 
einzugeben. Die Abspeicherung 
des Shapes muß mit GOTO zn (zn = 
Zeilennummer) gestartet werden! 
Ein Start mit RUN löscht den 
Shape-String! 

I Wolf EREBEREEN 7 


rem shaps-alien 
or il toa 


read b:b$=chr$ (b) 
a$-aS+b$: next 


1,252,0,0,3,254,0,2 
14,121,0,0,38,121,128,0 
63,125,192,0,127,190,240,0 
855,223,120,0,255,223,124,8 
255,207,62,0,123,239,190,0 
125,230,54,0,60,112,236,28 


30,31,152,0,7,128,112,0 
11,255,2080,0,16,255,132,0 
32,126,2,2,64,1902,1,0 
64,102,1,0,32,102,14,0 
28,102,12,0,12,102,0,0 
0,103,224,0,0,96,0,08 
0,127,192,90,24,0,24,0 


Listing 3: „Alien“: Mit SHAED kein Problem 


«4 Der freundlich "aus Listing 3 


BEBAUEN- BEWAHREN 
Brot 


für die Welt 
FRE 
Postgiro Köln 500 500-500 


stehen kommen. »Brot für die 
Welt« fördert Maßnahmen 

zur Aufforstung und zur Wieder- 
einführung bodenschonender, 
kostengünstiger Landbausysteme. 
Postfach 476, 7000 Stuttgart 1 


Ob in Indien, Brasilien oder 
im Sahel: Die ökologische 
Zeitbombe tickt. So können 
z.B. Brandrodung oder auch 
Monokulturen für den Export 
Mensch und Natur teuer zu 
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Spiele Listing 


Ein Kampf um Oel 


System: C16/116/Plus4 
Typ: Denkspiel 
Sprache: Basic 3.5 


Ein bis drei Teilnehmer können 
gleichzeitig bei diesem Kapitali- 
sten-Spiel mitmachen. Die Spiel- 
stärke ist zwischen | = schwer bis 
9 = leicht wählbar. Je einfacher 
die Schwierigkeitsstufe, desto hö- 
her ist das Startkapital mit dessen 
Hilfe über das menügesteuerte 
Programm. Ölfelder, Pipelines, 
Bohrgestänge und Raffinerien ge- 
kauft werden. Beim Spieldurch- 
gang kann jedoch nur einer dieser 
Artikel erworben werden. Zur 
Förderung sind allerdings Ölfeld, 
Pipeline und. Bohrgestänge not- 
wendig. Eine Raffinerie veredelt 
das gewonnene Rohöl in Benzin 
und Heizöl. 


„Oel“ ist Stichwort und 
Programmname eines 
neuen Strategiespiels 
für den C16. Berstende 
Bohrgestänge, explo- 
dierende Raffinerien, 


versiegende Ölquellen 

und ein rapider Verfall 

des Weltmarktpreises 
sind Begleiterschei- 
nungen beim Kampf 
ums schwarze Gold. 


Am Anfang jeder Spielrunde zieht 
das Programm von jedem Teilneh- 
mer mit einem Kapital über 70 000 


Dollars einen Steuersatz von 7 Pro- 
zent ab. Weitere Abzüge entste- 
hen durch den Unterhalt der Öl- 
felder, Raffinerien, Pipelines und 
Bohrgestänge. Sinkende Preise 
und ständig fallende Förderquo- 
ten sind der Grund dafür, daß die 
Fixkosten der Firma bald höher 
sind als die Einnahmen. 


Kohle machen mit Öl 
Fr RENTE OLE 


Hilfskredite der Banken sind auf 
100 000 Dollar limitiert. 
Verschleißerscheinungen und fal- 
sche Bedienung der Anlagen füh- 
ren zu schwindelerregenden Ko- 
sten. Sieger ist am Ende, wer sich 
am besten gegen Konkurrenz und 
wirtschaftliche Pendelschläge 
durchsetzt. 

Olaf Panz RR 
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rem „mn... nn. n.n....n.n.... 

rem oel c16/116+64k 

rem 

rem copyright 1985 by 

rem 

rem olaf panz 

rem drosselgasse 4 

rem 28095 marschacht 

rem “ “ 

rem SEREREEERERERETRERERER 

color ®,1:color 4,1:print chr$ (27)+”"c 

C2home,c1ir]” 

print "Cclr,down, pur, down, Bspaces,rvs, 

Sspaces, off ,Sspaces,rvs,Sspaces,off, 

Sspaces,rvs] [Loff]” 

aS=-"[(Bspaces,rvs] [off 3spaces,rvs] 
Coff ,Sspaces,rvs] [off ,Sspaces,rvs] 
Coff)”":print a$:print a$ 

print "[C8Bspaces,rvs] [off , 3spaces,rvs] 
Coff ,Sspaces, rvs,5spaces, off ‚Sspaces, 
rvs] Loff)” 

print a$:print a$:print "[Bspaces,rvs, 

Sspaces, off ,5Sspaces, rvs,5Sspaces,off, 
Sspaces, rvs,Sspaces, off ‚3down]” 

print "[2down, wht , 18spaces]copyright 
1985 by ” 

print spc(18)”CdownJolaf panz”:print 
spc(18)"Cdownldrosselgasse 4”:print 
spc(12)"Cdown]J2095 marschacht” 

for t=® to 45:read a$:poke 1552+t,dec 
(a$):next t:sys 1585:vol 5 

gosub 33:gosub 29:print "Cdown] 
versuchen sie erdoel zu foserdern und 
zuldown) raffinerieren” 

print "Cdown] kaufen sis sich 
erdoelfelder ‚pipelines[down) und 
bohrgestaenge zum rohoelfoerdern.” 

print "[Cdown] kaufen sie sich dann 
eine raffinerisldown, 4spaces]und 
raffinerieren sie das rohoel zu” 
print ”Cdown] benzin und heizoel.”: 
print ”"Cdown] versuchen sis[2spaces) 


UUEDTRESORET WE DAFFIPREOATNN, 


mit den gegsbenen” 

print "Cdown] kapital, soviel geld,” 

print "Cdown] wie moeglich 
herauszwirtschaften, ":gosub 33 

gosub 23:print "[downlihnen werden 
folgende kosten laufsnd [down, 

3spaceslabgezogen :” 

print "Cdown,yel] 1. 8,7%C[Cshift-space) 

vermoegenssteuer ‚wenn sie mehr [down, 

SspacesJals 70 000 $ haben.” 

print "Cdown] 2. unterhaltungskosten 
fuer ihre [down, 1dspaces) 

unternehmen.” 

print "[Cdown,whtIdie Ffoerderung ihrer 
oelquellen nimmt [down, 2spaces)Jmit 
der zeit ab. ” 

print "Cdown]Jseien sie auf 
ueberaschungen gefasst | [down]” spc( 

13)”Cgrn,flashon]lviel spass[flashoff)” 
:gosub 33:goto 38 

print "Ccir,yel]” spc(16)"osl”:print ” 

Cdown, cyn,3spaces]copyright[2spaces] 
1985[l2spaces])by[2spaceslolafl2spaces] 

panzlwht)”:return 

print "Cdown, 3spaces, flashon,cbm +, 

flashoff)]” 

get key a$:a=val (a$):if all or adan 

then 31 

print "Cup, Sspaces)”: return 

poke 239,8:char 1,16,24,”Ccbm 6,wht] 

taste”:get key a$:return 

gosub 29:print "[Cdown]spieler :”; 

na$(sp); "C[3spaces]kapital :"”;ka(lsp)”S” 
:return 

print "Cdown]sie haben nicht genug 
geld !!":gosub 33:goto 54 

data ad,11,ff,29,ef,8d,i1,Ff,a6,c6,e®, 
492,£0,18,ad,11,fF,09,10,8d,11,fFf,8e8,de 
data ff,a2,c7,8e,12,Fff,4c,de,ce,78B,a2, 
10,88,14,03,a2,06,88,15,23,58,68 
gosub 29:print "CdownJwieviele spieler 
(1-3) ?":an=3:gosub 38:trap 216 
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dim ka(3),na$(3),feCa*3), fmla*3),rala* 

3),rp(a*3),bt(a),pi(a),lela),sc(a), 
ro(a) 

dim st(9,3),we(9),kr(a) 

gq=-a:print "Cdown]llevel (1-S)C3spaces]i1 
- schwer[4spaces]9 - leicht ?”:an=9: 

gosub 30: w=a:a=q ‚ 

sd-a:def fn x(Ca)"-int (a*1900+,5)/1080: 

def £fn y(la)-int (Ca+.5):bo=-®:bp-int ( 

rnd (1)*#le4)+5e4 

for t=1 to a:print ”Cdownlihr name, 
spieler";t:bt(t)=2 

input "C[down]”;na$Ct):if len (naSlt))> 

9 then print "Cdown)der name ist zu 
lang”:goto 44 

kalt)=-185+w*Se4t:next t 

for t=-1 to sd*3: felt)-®:fmlt)-int ( 

rend (1)*3e3)+9e3:fplt)-int C rnd (1)* 
le4+fm(lt)) 

ralt)=®:rplt)=Se4+int C rnd (1)* 
18888) :next t 

sp=-l:bb=int (C rnd (1)*1e3)+38e3 

gosub 224 

for t=1 to sd*3:q=® 

if Fm(t)<1008 then gosub 29:print ” 
[Cdownldie oelquelle nr."t” ist 
versiegt ..":gosub 33:q*28 

if q=28 then fe(lt)=20:print "Cdownlsie 
gehoert :”;na$(fe(t)) 

next t 

gosub 34 

print spc(18); "LCdownJkaufen”:print "” 
Cdown) (1)C2spacesloslfelder kaufen”: 

print "[down) (C2)[2spaces)raffinerien 
kaufen” 

print "Cdown] (3)[2spaces] 

bohrgestaengsfirma kaufen”:print ” 

Cdown] (4)[2spaces]lbohrgestaenge 
kaufen” 

print "[Cdown] (5)[2spaces)pipsline 
kaufen”:print "[down] (6)[2spaces)] 

naechstes menue”:vol 4 

an=6E:gosub 30:on a goto 114,127,135, 

149,157,59:goto 58 

gosub 34:print spc(10); "Cdown] 

verkaufen”:print ”"[C2down] (1)[2spaces) 

heizoel verkaufen” 

print ”"C[Cdown) (2)C2spaces]benzin 
verkaufen”:print "Cdown] (3)[C2spaces] 

rohoel verkaufen” 

print ”"Cdown] (4)[2spaceslweiter"”:an=-4 

su. 38:on a goto 166,179,174,63:goto 

gosub 34:print spc(5); ”"[down] 

sonstiges” 

print "Cdown] C1)C2spaces] 

kapitalstatistik"”:print "[down) (2) 
[2spaces]sachuebersicht” 

print "Cdown] (3)L2spaces] 

produktionsuebersicht”:print ”Cdown) 
(4)C2spaces]lkredit aufnehmen” 

print "Cdown] (S)[2spacesIkredit 
zurueckbezahlen”:print "[down] (6) 
C2spaces]Jnaechster spieler” 

an=-6:gosub 38:on a goto 178,188,198, 

206,211,68:goto 67 

for e=8 to ® step -1:st(le+1,sp)*=st(e, 

sp):wele+1)=®:next e:st(®d,sp)=kalsp): 

ad 

for t=1 to sd*3:if felt)=sp then a=a+1 

next :q=®d:if a>pi(sp) then a-pi(sp) 

if a>bt(sp) then a=bt(sp) 

if a=® then 76 

for t=1 to sd*3:if Fm(t)<>® then a=a- 

1:q=-g+Fmlt}3:Emlt)=-Emlt)-En ylEmlt)/ 

188*C rnd (1)*10)) 

if a<>® then next t 

ro(sp)*ro(sp)+q*1® 

if kr(sp)=® then 78:else q=fn 

uCckr(sp)/10) 

if ka(lsp)-q<‘1 then kr(sp)=kr(sp)+g: 

else ka(sp)=ka(sp)-q 

if ro(sp){-® then 81 

for t-1 to sd*3:if ralt)<>sp then next 

t:goto B1 
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q=fn y(ro(sp)/3):rolsp)*-ro(lsp)-g: 
le(sp)=le(sp)+fn y(q/3):sc(sp)=sc(sp)+ 

£En y(g/3) 

q=®:for t-1 to sd*3:if ralt)=sp then 

q=-q*+tint C rnd (1)*1e3)+4e3 

if felt)=sp then q=q+int ( rnd (1)* 

1e3)+6e3 

next t:q=q*+pi(sp)*C int C rnd (1)* 

1e3)+3e3)+bt(sp)*C int C rnd (1)*3a3)+ 

483) 

if q<ka(sp) then BB:else gosub 34 

print "Cdownldie unterhaltungskosten 
fuer ihr betrib[down) ist grossser, 
als ihr kapital.” 

if kr(sp)=® then kr(sp)=q:print ” 
Cdown]sie nehmen eins kredit von”q”$ 
auf"”:gosub 33:goto 89 

gosub 33 

kalsp)=kalsp)-q 

if kalsp)-kr(sp)>7e4 then kalsp)- 
kalsp)-fn yCka(sp)/100*.7) 

if bt(sp)=® or rnd (1)>.1 then 94 

gosub 34: print "Cdownlihr 
bohrgestaenge wurde beschaedigt ..”:q* 
int (C rnd (1)*1008)+2008 

print ”"Cdownleine reperatur kostet”q” 
$.”:kalsp)=kalsp)-q 

gosub 33 

for t=1 to sd*3:if felt)<>sp then next 

t:goto 97 

if rnd (1)>.1 then 97:else gosub 34 

print "Cdown] eins ihrer oelfelder ist 
veberaschend[2spaces, down] versiegt.” 
:Felt)=200:gosub 33 

for t=1 to sd*3:if ralt)<>sp then next 
:goto 104 

if rnd (1)>,1 then 108:else gosub 34 

print "Cdown] eine ihrer raffinerien 
ist explodiert.”:ra(lt)=200:gosub 33: 

goto 194 

if rnd (1)>,.1 then 104:else gosub 34 
print "Cdownlin ihrer raffinerie ist 
ein tank":q=fn y(ro(sp)/10) 

print ”"Cdownlgeplatzt. es sind ”q” 
liter rohoel”:print "[Cdown] 
ausgalaufen."”:gosub 33:ro(sp)*ro(sp)-q 
ro(sp)"ro(sp)-q 

if rnd (1)>.1 or pt(sp)-® then 106 
gosub 34:print "Cdown] ihnen ist eins 
pipeline geplatzt.”:pi(Csp)-pi(sp)-1: 
gosub 33 

if rnd (1)>.1 or bt(sp)-® then 108 
gosub 34:print "[down] ihnen ist ein 
bohrgestaenge zerbrochen.”:gosub 33: 
bt(sp)=bt(sp)-1 

for t=1 to sd:if kalt)>1 then i1l2:else 
next t:gosub 29 

print "Cdown] alle spielteilnehmer 
sind pleite.” 

print ”"C2downlwollen sie nocheinmal 
spielen ?” 

print "[down] (C1)[2spaces]ja”:print ” 
Cdown]) (2)[2spaces]nein”:an=-2:gosub 
30:if a=1 then run :else end 
sp=-sp+tl:if sp>sd then sp-1:gosub 224 
if kalsp)<1 then 112:else 58 

for t=1 to sd*3:if feClt)=® then 116: 
else next t 

print "[clr]es sind alle oelfelder 
verkauft.”:gosub 33:goto 54 

gosub 34:print "CdownJfolgende 
oelfelder koennen sie kaufen :” 

print spc(108); "Cdown,shift -Joslfeld 
[shift -Jqualitast[shift -JIpreis 
C2spaces, shift -]":print spc(10)" 
Ccbm q,8shift *,shift +,9shift ®, 

shift +,7shift *,cbm wJ” 

e=-d:for t-1 to sd*3:3$*-str$ (fplt))+ 
"S”:if Felt)<>® then next t:goto 123: 
else a=-e+l 

print spc(18);"[shift -] ”;t;” 
C4spaces,shift -,9spaces, shift -, 

7spaces,shift -]”:char 1,30,9+e,a$ 

if fmlt)<i1e4 then a$="schlecht”:goto 
122 
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if Emlt)>1e4 and Fm(t)<11008 then a$- 

"mittel”:else a$-"gut” 

char 1,28,9+e,a$:print :next t 

print :print "[2down)Jwelches oelfeld 
wollen sie kaufen ?” 

an=sd*3:gosub 38:if Fela)<>® then 124 

if kalsp)-fp(a)<® then 35 

kalsp)=-kalsp)-fFpla):feCla)=-sp:goto 59 

goto 231 

gosub 34:print "Cdown)lfolgende 
raffinerinen koennen sie kaufen 

[2down]” 

for t=1 to sd*3:if ra(lt)<>® then 131 

print "raffinerie ”;t;” :[2spaces) 

preis :”;rp(lt)"$”:color 1,Ct/2=int (t/ 

B))+5 

next t:print "[C2downJwelche raffineris 
wollen sie kaufen ?”:an=sd*3 

gosub 38:if ra(la)<>® then 132 

if kalsp)-rp(a)<® then 35 

kalsp)=ka(lsp)-rp(la):rala)-sp:goto 59 

if bo=sp then print "[clrJihnen 
gehoert die bohrgestaengefirma”:gosub 

33:goto 54 

gosub 34: print "[Cdownlinter bohr ist 
die einzige firma, [down,6spaces)die 
bohrgestaenge herstellt.” 

print "Cdown]sie gehoert z.z. :";:if 

bo=® then print "bank”:else print 

na$(bo) 

print ”Cdown]sie ist fuer ";bp;"$ zu 
kaufen.”:print ”"Cdownlwollen sie die 
Firma kaufen ?” 

print ”"[Cdown) (1)[3spaces)]ja”:print ” 

Cdown) (C2)C3spaces)nein” 

an=2:gosub 38:if a=2 then S4:else if 

ka(sp)-bp<® then 35:else kalbo)- 

kalbo)+bp:gosub 34 

katsp)=kalsp)-bp:bo=-sp:print "[Cdown] 
legen sie nun den neuen verkaufspreis” 

print "Cdownlfuer die firma Fest.er 
darf nicht mehr[2spaces, downlals 5% 
vom alten wert abweichen.” 

print "Cdownlalte preise: [2spaces] 

firma :”;bp”$”, , "Cdownlbohrgestaenge : 
"»bb”$SCdown]” 

input a:if a<bp-fn y(5*bp/100) or a> 

bp+fn y(5*bp/108) then print ”"Lup]”;: 

goto 144 

bp=a:print ”[downlJgeben sie nun den 
preis fuer ein bohr-[down,2spaces) 

gestaenge ein. er darf auch nur” 

print ”[down]J5% vom alten wert 
abweichen.” 

input a:if a<bb-fn y(5*bb/100) or a> 

bb+fn y(5*bb/100) then print ”"Lup)”;: 

goto 147 

bb=a:goto 59 

e=fn yCbb+Csp=bo)*bb/10) 

gosub 34:print "C2downlein 
bohrgestaenge kostet”;e"$” 

print "Cdown] wollen sie ein 
bohrgestaenge kaufen ?” 

print ”[down) (C1)C2spaces]ja”:print ” 

Cdown]) C2)[2spaces)Jnein”:an=2 

gosub 30:if a=2 then 54 

if katsp)-e<® then 35:else kalsp)- 

ka(sp)-e 

if sp<>bo then kalbo)=kalbo)+fn yle/ 
18) 

bt(sp)-bt(sp)+l1:goto 59 

gosub 34:q=fn y( rnd (1)*2e3)+2et 
print "Cdownleine pipeline kostet ”; 
q”$”:print "Cdownlwollen sie eine 
kaufen ?”:an=2 

print "Cdown]) (1)[2spaces)ja”:print ” 
Cdown]) (2)[2spaces)nein” 

gosub 30:if a=2 then 54 

if kalsp)-q<® then 35:else kalsp)- 
kalsp)-q 

pi(lsp)=pi(sp)+1:goto 59 

print "Cdown]sie bekommen ein angebot 
:Cdown]” 

print q”$ Je liter”:print "[down]sie 
haben”;qw;” liter”:print ”"[down] 
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wieviel wollen”; 

print ” sie verkaufen[down]”:input w: 
return 

gosub 34:if le(sp)<=® then print ” 
Cdown]sie haben kein heizoel”:gosub 
33:goto 59 

print spc(18)"[C2downlheizoel 
verkaufen”:q=fn xC rnd (1)*.3)+.5:qw= 
le(sp):gosub 163 

if w>le(sp) then print "[down]soviel 
heizoel haben sie nicht !”:gosub 33: 
goto 59:else le(sp)-le(sp)-w 
kalsp)=fn yCkalsp)+w*g):goto 63 

gosub 34:if sc(sp)<-=® then print ” 
Cdown]sie haben kein benzin”; :gosub 
33:goto 59 

q=fn x(C rnd (1)*.2)+.9:print spc(10)” 
C2downlbenzin verkaufen” :qw=sc(sp): 

gosub 163 

if w>sc(sp) then print "”[downlsoviel 
benzin haben sie nicht”:gosub 33:goto 

5g 

sc(sp)*-sc(sp)-w:goto 169 

gosub 34:if ro(Csp)<=® then print ” 
[down]sie haben kein rohoel":gosub 33: 

goto 59 

q=fn xC rnd (1)*,5)+,.1:print spc(19)” 
C2down)rohoel verkaufen”:qw*ro(sp): 

gosub 163 

if w>ro(sp) then print "[down]soviel 
rohoel haben sie nicht”:gosub 33:goto 

59 

ro(sp)"=ro(sp)-w:goto 1569 

gosub 34: print spc(18)"[Cdown] 

kapitalstatistik”:for t=® to 9:welt)- 

st(t,sp):next t 

for t=® to 9:welt)=welt)/2:next t:Ffor 

t=® to 9:iFf we(lt)>188 then 179:else 

next t 

for t=3 to 2 step -1:welt)=fn 

yvlwelt)):a$="":color 1,6,7+C int (t/ 

Be)=t/2)"y 

if we(ct)>B then a$=a$+"[rvs]) [Coff,up, 

left]”:welt)=welt)-B:goto 181 

if welt)=1 then a$-a$+”[chbm @J”:else 

if welt)=2 then a$=a$+"[cbm p]l”:else 

if we(t)=5 then aS=a$+"[rvs,cbm u,off] 

if we(ct)=3 then a$=a$+”"[cbm 0)”:else 

if welt)=4 then a$=a$+"[cbm i)”:else 

if welt)=6 then a$S-a$+"”[rvs,cbm y,off] 


if we(lt)=7 then a$-a$+"[rvs,cbm t,off) 


if a$="” then a$="[cbm @)” 

char 1,t*3+1,24,a$:char 1,t*3+2,24,a8$: 
char 1,t*3,24,a$ 

next t:char 1,15,9, "Lwhtltaste”:get 
key a$:goto 63 

gosub 34:print spc(12)"[Cdown] 
sachuebersicht"”:print "Cdown, 6spaces) 
sache :[8spaces]Janzahl :” 

a=-d:for t=® to sd*3:if ralt)=-sp then 
a=a+1 

next t:print "[down] raffinerien” spc( 
13)a:a=d:Ffor t=® to sd*3:if fFelt)=-sp 
then a-a+i 

next t:print ” oelfelder” spc(15)a 

if bo=sp then print ” 
bohrgsestaengsfirmen” spc(6)"”1"” 

print ” bohrgestaenge” spce(11l)bt(sp): 
print ” pipelines[4spaces)” spc( 
11)pi(sp) 

print " heizoel” spc(17)le(sp):print ” 
benzin” spc(18)sc(sp) 

print ” rohoel” spc(18)ro(sp) 

gosub 33:goto 63 

print spc(19)”+”:return 

gosub 34:print spc(10)”[down]) 
produktionsuebersicht[Ldown]”:for t-=® 
to sd*3 

if Ffelt)<>sp then next :print ”"[down] 
ihnen Fehlt ein oelfeld”:goto 285 

print spc(5)"oelfeld”:if bt(sp)-® then 
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print "Cdownlihnen fehlt das 217 print ”"Cdown] wollen sie aufhoseren zu 5974 
bohrgsstaenge”:goto 205 spielen ?"”:print "[down) C1)[2spaces] 
201 gosub 197:print spc(5)”"bohrgestaenge”: 6917 Ja”:print "[Cdown) (2)C2spaces)Jnein” 
if pi(sp)-=® then print "Cdownlihnen 218 an=-2:gosub 38:if a=2 then resume next 1896 
fehlt die pipsline”:goto 295 219 gosub 34: print spc(18);”C[Cdown] 2430 
202 gosub 197:print spc(5)"pipeline":print 5452 rangfolge” 
spc(18)”=-";print spc(5)”"rohoel"”:for t= 2208 For t=1 to sd:kalt)=kalt)-krlt):next 4483 
8 to sd*3 t:for t=1 to sd:for e=1 to sd-1 
203 if ralt)<>sp then next t:print "[down]) 4295 221 w=B:if kale)<kale+1) then q=kale): 6580 
ihnen fehlt sine raffinerie”:goto 205 kale)=-kale+l):kala+l)=-q:q$=na$le):w=1 
204 gosub 197:print spc(5)"raffinerie”: 5307 B22 if w=i1 then naSle)=naSle+1):naSle+1)- 3565 
print spc(18)”=-":print spc(5)"benzin + qS 
heizoel” 223 next e,t:for t=1 to sd:print ”[down]”; 5455 
205 gosub 33:goto 63 1218 naS(t) spc(15-len (na$(lt)))”:” spc( 
206 gosub 34:if kr(Csp)<%® then print ” 5931 S)ka(lt)”$S”:next t:goto 118 
[down]sie haben schon einen kredit”: 224 gosub 29: print spc(5)”"[2down, shift -, 4507 
gosub 33:goto 63 3spaces]spieler [shift -,3spaces) 
287 print spc(18)”Cdownlkredit nehmen”: 5178 kapitall2spaces, shift -] rang 
print "Cdown]sie koennen bis zu 100008 [shift -) 
5 leihen.” 225 print spc(5)"Ccbm q,iishift *,shift +, 4467 
208 print ”Cdown]lbei einem zinssatz von 10 2854 12shift *®,shift +,6shift *,cbm w]”:for 
Cshift-spacse]%.” t=-1 to sd*2+1 
203 input "CdownJwievisl geld wollen sis 6683 226 print spc(5)”[shift -,11spaces, 3412 
leihen ”;q:if q<1 or q>ieS then print shift -,l12spaces,shift -,6spaces, 
"[2up]”;:goto 2089 shift -J":next t:for t=1 to sd 
210 kalsp)=kalsp)+q:kr(sp)=qg:goto 63 2975 827 char 1,7,6+t*2,na$(t):a$=strS (C £n 4914 
@11 gosub 34: if kr(sp)=® then print ” 6520 xCkalt)))+”"$”:char 1,18, 6+t*2,a$ 
Cdown]sie brauchen keinen kredit 228 if kalt)>=kal1) and kalt)>=kal2) and 5267 
tilgen”:gosub 33:goto 63 kalt)>=ka(3) then a$="1":goto 239 
212 print "Cdownlihr kredit betrasgt "” 3017 229 if kalt)>kati) or kalt)>kal2) or 4574 
kr(sp)” $,” kalt)>ka(3) then a$="2":else a$-"3"” 
213 print "CdownlJwieviel wollen sie 3646 238 char 1,33,6+t*2,a$:next t:goto 33 2332 
abbezahlen ?Ldown]” 231 pm=®: for t=1 to sd*3:if ralt)=® then 4211 
214 input q:if q>kr(sp) or q>ka(sp) then 3458 pm=1:next t:goto 233 
print "LupJ”;:goto 214 232 next t 298 
215 kr(sp)=kr(sp)-q:kalsp)=kalsp)-q:goto 3752 833 if pm=1 then goto 128 1176 
63 234 print chr$ (147);"keine raffinerie zu 5059 
216 gosub 29:print "[down) ” 1817 kaufen”:gosub 33:goto 55 
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Earth Defender 


System: C16/116/Plus4 
Typ: Action-Spiel 
Sprache: Basic 3.5 


- Der Angriff rollt. Eine Bombe nach 

| der anderen wandert mit Ziel Erd- 
oberfläche über den Bildschirm. 
Die einzige Überlebens-Chance 
unseres Planeten ist, die lebens- 
notwendigen Kraftwerke vor den 
herabfallenden Bomben zu schüt- 
zen. 
Zwei Minuten lang steht der Spie- 
ler in schwerstem Gefecht. Je hö- 


rem sarth defender 
rem by r. adling 
scenelr :color 1,2:color ®,1 


char 1,10,7,"spielstaerke: ":input g:y*= 
1:char 1,10,9,”name”: input n$: 


1,1:vol B 


for w=® to 18:draw 1,8,100+, to 319, 
188+y:let y=y*+int (y*1.1):next :color 


4% 
for y*i to 18:draw 1,90,102-y 


182-y:next :box 1,221,103,239, 


1,222,100 
for n"1 to 12:draw 1,150,95+n 


95+n:next :circle 1,280,50,20, 


1,290,50 


draw 1,201,78 to 201,185:for y-i1 

18:draw 1,60,97+, to 85,97+y:next 
draw 1,135,178 to 130,1802:draw 1,185, 
178 to 188,188:box 1,135,150,185,170 
draw 1,135,150 to 130,180:draw 1,185, 


158 to 188,188:char 1,0,0,n$ 


for x"-1508 to 1508 step 100:0=-o+1®: 
draw 1,0,188 to x,208:next :drau 8,60, 


169 to 270,169 


ti$="000000":draw 8,144,137 to 112,183 
for u=1 to 28 step 2:draw 1,135+u,170+ 
u/2 to 185+u,178+u/2:next :draw 8,188, 


148 to 197,184 


ceircle 1,160,160,110,25:draw 8,184, 


137 to 196,185:goto 965 

draw ®,a,b:char 1,32,0,ti$ 

if Joy (1)=3 then 498 

if Joy (1)=7 then 708 

if Joy (1)=128 then 808 

draw 1,160,150 to 168+c, 140 
b=b+int C rnd (1)*g)+1 

if b>108 then 900 : 
draw l1,a,b:sound 1,8008-b*4,1 
goto 188 

sound 3,18018,4:draw 8,1698,15® 
c,148:c=c+5:if c>1® then c=1®8 
goto 118 

sound 3,1012,4:draw ®8,160,150 


c,148:c=c-5:if c<-18 then c=-18 


goto 118 
sound 3,1818,3:sound 3,444,2 
if c=-® and (a-1608 or a-1508 or 


Dieses kleine Programm steu 


SUPPEN TORE LOBRLEFSVOREDELTIN 


Aus der Tiefe des Alls 
nähert sich der Kampf- 
Planet Atreides. Er ist 
Basis Hunderter 
Kampfbomber, deren 
Ziel es ist, die Erde zu 
vernichten. Der Kampf 
beginnt. 


her die Spielstärke (1 = leicht, an- 
steigende Zahlen =. schwieriger) 
desto höher ist die Fallgeschwin- 


digkeit der Bomben. Die Abwehr- 
kanone wird mit einem Joystick in 
PORT 2 gesteuert. 

Ein Tip: Nach dem Bildaufbau feu- 
ern die feindlichen Atreider ohne 
auch nur eine Sekunde zu zögern. 
Also aufgepaßt! 

Ein einzelner Treffer richtet noch 
wenig Schaden an. Die Energie- 
versorgung bleibt gesichert. Erst 
wenn mehrere Bomben die Kraft- 
stationen treffen, gibt es ernste 
Energieprobleme. Sind alle Statio- 
nen vernichtet, zerstört Kampfpla- 
net Atreides die schutzlose Erde 
mit einem Hochenergiestrahl. 

R Adıng EEE 


a=165 or a=1708) then 908 
if c=-5 and (a-1908 or a-195 or a-208 or 


graphic 


a=205 or a=218 or a-175 or a-188 or a- 
185) then 990 


if c=--5 and (a-105 or a-11®8 or a-115 


or a=128 or a-125 or a-=138 or a-135 or 
a=-148 or a=145) then 908 


if c=-18 and (a-215 or a=2208 or a=-225 


to 140, 
98:paint 


or a=230 or a=235 or a-248 or a=245 or 
a=-250) then 998 


if c=--18 and (a-108 or a-S5 or a=308 or 


to 170, 


28: paint or 


goto 128 
to 


444,20 


444,20 


a=-85 or a-88 or a-75 or a-7® or a-65 
a=-60) then 900 


draw 1,a,b to a,b-18:draw 1,a,b to a+ 
3,b-18:draw 1,a,b to a-3,b-18:sound 3, 


draw 1,a,b to a,b-18:draw 1,a,b to a+ 
3,b-18:draw 1,a,b to a-3,b-18:sound 3, 


draw ®,a,b to a,b-18:draw ®,a,b to a+ 
3,b-10:draw ®,a,b to a-3,b-18 


if b>128 then 935 


let p-p+1808-b 
let t=t+1:goto 965 
if a=-208 then draw 8,201,78 to 201,105 


if a=-208 then pk=pk+300 


if a<171 and a>149 then let pk=pk+100 


if a<248 and a>2128 then let pk=pk+222 


let pk=pk+13 


if a>89 and a<141 then let pk=pk+244 
b=-Bd:a=-int (CC rnd (1)*37)+12)*S 


if tiS>"000290” 


then 1208 


if pk>2008 then 1200 


goto 120 


graphic clr 


to 168+ 


to 168+ 


:char 1,180,15,"treffer:”: 
print t:char 1,18,18, "punkte 


"print 


pP 

char 1,18,21, "totel3spaces]: ”:print 
pk:end 
draw 1,280,58 to 168,168:sound 3,1012, 
=} 


for o=® to 208 step 7:circle 1,168, 


168,1+0,8+0/3:next :sound 3,444,25: 
sound 3,555,68 


a=-155 or goto 1928 


atreidische Angriffe 
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System: C16/116 
16-KB-RAM 

Programmart: Action-Game 

Sprache: Basic 


Unter großen Verlusten wurde 
die psellarische Invasionsflotte 
vernichtet. Im Zuge der Gegenof- 
fensive benötigt die irdische Ab- 
wehr weitere durchtrainierte 
Kämpfer. Nur verstärkte Offensiv- 
Einheiten haben Aussicht auf Er- 
folg. Deshalb werden neue Besat- 
zungen ausgebildet. Den letzten 
Test eines jeden Rekruten, die 
letzte Bewährungsprobe, simuliert 
ENEMY. 


Die große Prüf ung 


Zwei Spieler stehen sich gegen- 
über. Mit Joysticks in PORT | und 
2 kontrollieren die Simulationsteil- 
nehmer alle Aktionen am Bild- 
schirm. Beide Spieler müssen 3 
Schlüssel sammeln um einen 
Raumgleiter zu gewinnen. Bewaff- 
net mit einer Übungspistole, (5 
Schuß je Magazin), machen sie 
sich auf den Weg. Mit lautem 


print "Cclr,6downJ” 


print chr$ (142):print chr$ (8) 


eolor 8,14,6:color 4,14,6 


print "[Cyel,Sspaces)Ulshift *JI[chbm a, 
cbm r,cbm s,2spaces]JU[lshift *JIU 


Erfolg 


Es herrscht Krieg im 

Universum. Machtgie- 
rige Psellaren wollen 
die Menschheit unter- 


Jochen. Trotz erfolgrei- 
cher Vernichtung des 
feindlichen Stützpunk- 
tes T7 durch Terraner 
geht der Kampf weiter. 


Knall fliegen getroffene Barrieren 
in die Luft. Intensiver Schußwaf- 
fengebrauch führt rasch zu aku- 
tem Munitionsmangel. Nachgela- 
den wird an mit „M“ bezeichneten 
Punkten im Spielfeld. In Bild 1 gibt 
es einen Schlüssel, dargestellt als 
„T‘. Erreicht ihn ein Spieler und 
gelingt es ihm, in den Transmitter- 
raum zurückzukehren, so beamen 
BEIDE Spieler ins nächste Bild. 
Dort geht die Jagd nach Schlüssel 
2 („R') und 3 („Z") weiter. Be- 
schießt ein Spieler erfolgreich 
den anderen, verliert dieser alle 
bisher gesammelten Schlüssel 


SpieleListing 


Sffensive zum 


und wird in die Transmitterkam- 
mer zurückgebeamt. Um zu Bild 1 
zurückzukehren, benötigt man 
Schlüssel 3. Er aktiviert den Trans- 
mitter. Schlüssel 2 hingegen öffnet 
das herbeigeeilte Raumschiff. 


So wird ze: 


ENEMY ist in zwei Listings geteilt. 
Teil I, „Start-Enemy“, umfaßt den 
geänderten Zeichensatz und die 
Erklärungen zum Spiel. Von dort 
aus wird Teil I, „HPT/ENEMY"“, 
geladen. Ist das C16-System mit 
einer Datasette ausgerüstet, so 
müssen folgende Zeilen geändert 
werden: 

1950 CHAR1,0,3,"LOAD" +CHR$ 
(34)+"HPT/ENEMY" +CHR$(34) + 

“ { 1; 1% 

1960 CHAR10,9, "RUN" 

1970 CHAR 1,0,11, "RUN" 

Der zweite Teil des Programmes 
muß als „HPT/ENEMY" abgespei- 
chert werden! 

WICHTIG: 

ENEMY funktioniert nur auf einem 
C16/116 mit 16 KBytes RAM!!! 
Axel Toepfer 


C3spaces]V[2spaces]2X” 
print "[4spaces]Z2X[4spaces)2XU 
C3spaces]2X 2X[4spaces]Z2XV ZXU 


C3spaces]V 2X” 
print "C3spac#as]ZUVUXl2spaces]2X U 


[shift *“JICcbm a,shift *,cbm s,cbm a, 

cbm r,cbm s]” 

print "[yel,Sspaces,shift -] [shift -] 
[shift -,3spaces]J[shift *JI[lshift -] 
C2shift -,3spaces, shift -]” 

print "[Cyel,9spaces,cbm q,shift *, 

cbm w] [shift -,2spaces, shift ®*, 

@spaces,2shift -] [shift -,cbm q, 

shift * 2spaces, shift -]” 

print ”"C[Cyel,9spaces,shift -] [shift -] 
[shift -,5spaces, 2shift -] [2shift -, 
3spaces, shift -]” 

print "[yel,Sspaces,cbm e] [cbm e] 
Ccbm e,3spaces]J[Lshift *JKJL[Lshift *JK 
[cbm e,3spaces,cbm e]"” 

print "[4down,12right]prasesentiert :” 
for i=1 to 1880:next i:poke 65286,0 
gosub 1808 

print "Cclr,6down]”:poke 65286,27 
print "Cblk, Sspaces]ZUUXL2spaces]2U 


[4spaces]2X ZUUXL2spaces)ZUL 2spaces]2U 


[2spaces]2X ZUUXT2spaces]2X V2X U 
£3spaces]JU2X” 

print "[2spaces]2X[4spaces]2X[2spaces] 
U 2X 2XCHspaces]2X[2spaces)]VX[2spaces] 
UL3spaces)JUxX” 

print ” ZX[4spaces]2X[3spacesJV2X 2X 
C4spaces]2X[7spaces]U[L2spaces]2X” 
print "ZUUUUXZXL4spacesIUX ZUUUUXZ2X 
CBspaces]V 2X” 

print "C[C4down, 14right, red]DL7spaces, 
grn]DCLbIkKI” 

print "[Cl2right,cbm 712VULgrn]UUUUUUULUU 
Ccbm 710” 

print "[C13right,grn]T[l9spaces]T"” 
print "C13rightITC9spaces]T"” 

print "C[Ci2right,cbm 7J2CgrnlUlchm 7]Y 
C3spaces)]D[L3spaces]2[grn)Ulchm 7IY” 
print 

" UWUUUUUUVUUUUUYYUUYUUUUUUUUUUUUUUUUUUUUU 
UUVEDIKI” 

gosub 2908 


Listing 1: ENEMY-START beinhaltet den geänderten Zeichensatz. 
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188 
1908 


200 
210 
220 
230 
240 
1000 
1818 
1920 
1025 
1039 


1040 
1058 


1955 
10608 


1079 
1080 
108399 
1190 
1118 
1120 
1138 
1140 


1158 


1160 


1178 


1180 


1198 


12008 


1210 


1220 
1230 


1240 


1250 
12608 
1270 
12808 
1290 


1398 
1318 


1320 


1330 
13408 


1358 


1360 


1378 


1380 
1398 
1490 
1420 
1430 


1448 


1450 


1460 


1478 


1480 


1492 


for i=-1 to 508:next i 

print ”C[down,2rightJwuenschen sie eine 
spielerklaerung ?” 

print "[down]”;spel14)”C J/n >” 

poke 239,8:get a$ 

if a$<>”"j” and a$<>”n" then 210 

if a$-"n” then 1890 

goto 14208 

poke 56,47:poke 52,47: v=65288 

poke v+1B,peek (v+18) and 251 

poke v+19,peek (v+19) and 3 or 48 

restore 1068 

for i-832 to 849:read a:poke i,a:next 
i 

sys 832 

For i-12808 to 13071:read a:poke i,a: 

next i 

return 

data 162,0,189,0,208,157,0,48,183,0, 
203,157,0,49,202,208,241,96 

data 8,8,25,30,24,36,68,132:rem 64 
data 16,16,152,124,24,36,34,33:rem 65 
data 73,42,28,28,28,34,34,34:rem 66 
data 16,16,254,24,24,36,36,36:rem 67 
data 16,16,56,124,56,36,36,36:rem 68 
data 08,08,30,28,28,18,36,072:rem 63 
data 16,16,120,56,56,72,36,18:rem 79 
data 836,102,126,102,102,126,102,036: 
rem 71 

data 255,231,231,231,231,231,231,255: 
rem 72 

data 60,60,126,126,255,255,195,129:rem 
73 

data 24,60,126,126, 255,255, 255,255:rem 
74 

data 255,129,251,247,239,223,129,255: 
rem 75 

data 255,189,153,165,165,189,189,255: 

rem 76 

data 255,129,129,231,231,231,231,255: 
rem 77 

data 255,135,187,135,183,187,187,255: 
rem 7B 

data 60,24,126,24,126,24,60,24:rem 79 

data 255,255,126,126,60,60,24,24:rem B 

(’) 

data 231,195,195,155,165,60,60,255:rem 
81 

data 0,7,19,53,88,144,0,0:rem B2 

data 231,195,195,129,129,0,8,8:rem 83 

data 98,82,74,70,782,74,82,98:rem 84 

data 85,255,98,82,74,70,255,255:rem 85 

data 255,189, 255,255, 255,255,189, 255: 

rem 86 

data 255,223,127,63,31,13,7,3:rem 87 

data 255,251,254,252,248,176,224,192: 

rem 88 

data 192,224,176,248,252,254,251,255: 

rem 89 

data 3,7,13,31,63,127,223,255:rem 98 

data 255,255,253,255,255,253,255,255: 

rem 91 

data 255,255,191,255,255,191,255, 258: 

rem 92 

data 255,219, 255, 255, 255, 255, 255,858: 

rem 93 

data 255, 255,255, 255, 255, 255,219,255: 

rem 94 

data 129,16,66,8,80,36,8,68:rem 35 

data 08,36,20,34,72,16,8,8:rem 96 

data 08,0,255,0,0,0,0,0:rem 37 

print, "Teir]? 

print "[2down]”;spc(18)"C[Crvs)] 
spielanleitung [Loff)” 

print "Cdown,right]ziel des spieles 
ist es,das einer der” 

print "[Cdown,right]lbeiden spieler 
seine Figur in bild 2 ” 

print ”Cdown,rightl)bringt, einen 
raumjaeger anfordert” 

print "Cdown,rightlund damit 
entkommt .” 

print "[down,rightlJum von bild 1 nach 
bild 2 zu gelangen,” 

print ”[down,rightlmuss zuerst key 


WVRIN 3 VORWE LEN POLEFETFSOTETINN 


4837 


1734 
1343 
2285 
1662 

591 
2682 
2384 
es21 

610 
2376 


619 
2648 


ı42 
6416 


2637 
2830 
es22 
2681 
2753 
2606 
2784 
3511 
44B0 
3120 
3188 
4267 
4997 
4446 
4367 


2955 
3271 


39317 
2313 
3253 
2740 
3189 
4174 


3354 
3895 


3730 


2974 
4208 


4174 
4226 
yayı 
2754 
2268 
2079 

316 
2733 
3538 
3758 
3914 
2265 
3596 


4741 


1508 
15198 
15208 


15398 
1548 


1552 
1560 
1578 
15808 
1590 
16908 
1618 
1620 
1638 
1640 


1658 
1668 


1678 
1680 
1650 
1708 
1718 
1720 
1738 
1740 
1750 
1760 


1770 
1780 


1798 
1800 
1818 
1820 
1830 
1840 
1858 
1868 
1870 


1888 
1838 


1998 


1910 
1920 


1938 
1948 
1950 


nr.1(CM) geholt werden.” 

print "Cdown,rightlanschliessend kommt 
man durch be-” 

print ”[down, rightlrushren des 
transmitters(0) zum hangar.” 

print ”[Cdown,Bright](C weiter mit 
’space’)"” 

get a$:if a$<>” ” then 1530 

print ”"Cdown,rightlim hangar muss ein 
raumjaeger ange-"” 

print "Cdown,rightlfordert werden( key 
nr.2 [CNJ).” 

print "Cdown,rightinur wer key nr.1 
besitzt,kann das.” 

print "[Cdown,right)da der andere 
spieler automatisch” 

print ”"Cdown,rightlnach bild 2 
mitgenommen wird, auch” 

print ”[down,rightlJwenn er nich key 
nr.i besitzt,kann” 

print "Cdown,rightlJdisser nun 
versuchen nach bild 1” 

print "[Cdown,right) 

zurueckzukommen ‚dazu muss er zuerst” 

print "[Cdown,right]lkey nr.3 (CK) holen 
und anschliessend” 

print "Cdown,right]zum transmitter (D) 
zurueck.” 

print "C2down,8Sright]( weiter mit 
'space ’)[down]" 

get a$:if a$<>" " then 1658 

print "Cdown,right]kommen beide 
figuren wieder in bild 1” 

print "Cdown,rightlJan,so gehen alle 
keys verloren.” 

print "[Cdown,rightJum das holen der 
keys zu erschweren,” 

print "[Cdown,rightldarf geschosseen 
werden. dazu muss” 

print ”"[down,right]ldie waffe an den 
munitionsdepots (L)” 

print "[down,rightlaufgeladen werden ( 
energie),.” 

print "[Cdown,rightJwird eine Figur 
getroffen,taucht sie” 

print "[Cdown,rightJim transmitterraum 
wider auf und kann” 

print "Cdown,rightlweiterspielen.es 
kostet sie jedoch” 

print "[down,rightlalle schluessel und 
energie." 

print ”"[Cdown,Sright]C weiter mit 
'space’)[down]” 

get a$:if a$<>" " then 1770 

print ”"Cdown,rightlum schotts zu 
passieren musssen diese” 

print "Cdown,rightlzerschossen 
werden.” 

print "[down,rightlgeschossen werden 
kann nur horizontal.” 

print "C3down,right]sollte ein Fehler 
auftreten, so” 

print ”Cdown,rightlwird sich der 
bildschirm, bedingt” 

print ”Cdown,rightldurch den 
geaenderten zeichensatz” 

print "[down,rightJmit Flimmernden 
zeichen fuellen.” 

print "Cdown,right]lduech betaetigen 
von 'f1’ wird ein” 

print ”"[Cdown,right]sauberer neustart 
durchgefuehrt..” 

print "[3down,8right](C weiter mit 
'space')” 

get a$:if a$<>"” ” then 1BB8 

print ”"C[Celr,6down,rightlJwenn sie jetzt 
[Crvs]’return’[loff] druecken, ” 

print "Cdown,rightlwird der 2.teil 
automatisch geladen” 

print "Cdown,rightlund gestartet.” 
print "C[CSdown,l1right,Flashon,rvs) 
viel spass ! [off,flashoff)” 

get a$:if a$<>chr$ (13) then 1938 
print "Cclr]Inew” 

char 1,80,3,”"load"”+chr$ (34)+ 


piele Listing aa mm un EnIunE 


3691 


yyyu 
3324 


1922 
3823 


3956 
42008 
3764 
3682 
3644 
3527 
4136 
4508 
33531 
3537 


1987 
3833 


3397 
4101 
3622 
3450 
3185 
3868 
3579 
3742 
3023 
3633 


2952 
3926 


2754 
50396 
3622 
36983 
3866 
3658 
3864 
3550 
3402 


1734 
4293 


3313 


1877 
3337 


2535 
867 
4263 
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"hpt/enemy”+chr$ (34)+",8,1” 
char 1,0,8,"run”":rem kass.:1,0,9 
rem nur kass.: chari1,0,11,”run” 
poke 1319,19:for i=1328 to 1322:poke 
i,13:next i:poke 239,4:end 

data 453,40,455,40,643,40,645,40 
data 704,10,708,10,685,10,688,10 
data 643,10,645,10,596,10,600,10 
data 643,40,645,40 

data 453,40,455,40,643,40,645,40 
data 704,10,708,10,685,10,688,10 
data 643,10,645,10,596,10,600,10 
data 739,60, 742,60 

restore 2008 

for i=-1 to 14:vol 8 

read a,b,x,y 


key 1,"Cclr]poke65288, 
peek(65298)and251:goto959”+chr$ (13) 
v-65238:poke v,peek (v) and 251:poke 
v+1,peek (v+1) and 3 or 48 

elr :gosub 15008:vol 8:gosub 19000 
x1%=Jjoy (1):sp%=1 

if al%-3359 then 9008 

if x1%-2® then 3600 

if x1%>8B then 1508 

on x1% goto 2000, 2400,2800,3200,1200, 
4000, 4400, 4800 

x2%=jJoy (2):sp%=2 

if a2%-3359 then 3000 

if x2%-® then 3808 

if x2%B then 1500 

on x2% goto 2200,2600, 3000, 3400,1000, 
4200, 4500,5000 

goto 1908 

on sp% goto 1600,1800 

if mi1%-® then 1200 

if x1%<>131 and x1%<>135 then 12998 
mi%=m1%-1:char 1,10,2,str$ (m1%) 

if x1%=-131 then x%=1:poke al%,64:goto 
1640 

if x1%-135 then x%=-1:poke a1%,65:goto 
1640 

goto 1290 

t%=al%:sound 3,1000,10 


do until peek (t%+x%)<>32 

tAa=t%rx% 

poke t%,37:poke t%-1024,83:poke t%,32 
loop 

poke al%,68:goto 8000 

if m2%=® then 10208 

if x2%<>131 and x2%<>135 then 1000 
m2%=m2%-1l:char 1,35,2,str$ (m2%) 

if x2%=131 then x%=1:poke a2%,64:goto 
1840 

if x2%=135 then x%=-1:poke a2%,65:goto 
1840 

goto 1900 

t%=a2%:sound 3,1010,10 


do until peek (t%+x%)<>32 

tA=t%rx% 

poke t%,97:poke t%-19024,91:poke t%,32 
loop 

poke a2%,68:goto 8008 

z1%-al%-40 

if z1%>3231 then if psek (z1%)-=32 then 
2040 

goto 6008 

poke al%,32:poke z1%,66:poke z1%-1024, 
50 

al%"z1%:goto 1298 

22%-a2%-40 

if z2%>3231 then if peek (z2%)-=32 then 
2240 

goto 6108 


Listing 2: HPT/ENEMY simuliert den letzten Test eines Rekruten. 
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sound 1,a,b:sound 2,x,4 

next i 

For i*1 to 5 

sound 3,1000,10 

poke 3766,64 

for r=3767 to 3773 

poke r,37:poke r-1024,83:poke r,32 
next r:for o=1 to S5@:next o:poke 3766, 
68 

sound 3,1010,18 

poke 3774,65 

for r=-3773 to 3767 step -1 

poke r,97:poke r-1024,31:poke r,32 
next r:for o=1 to S®:next o:poke 3774, 
68:next i 

return 


poke a2%,32:poke z2%,66:poke z2%-1024, 
53 


ab%"z2%:goto 1900 

21%=-a1%-39 

if z1%>3231 then if peek (z1%)-32 then 
2440 

goto 60008 

poke al%,32:poke z1%,69:poke z1%-1024, 
so 

al%"-zi%:goto 1208 

z2%=a2%-39 


d if z2%>3231 then if peek (z2%)=32 then 


2640 

goto 6108 

poke a2%,32:poke z2%,69:poke z2%-1024, 
53 

82%=-z2%:goto 1000 

z1%=-al%+1 

if z1%<4832 then if peek (z1%)-=32 then 
2849 

goto 56000 

poke al%,32:poke z21%,69:poke z1%-1024, 
so ‚ 

al%"zi%:goto 1200 

zex%-a2%+1 

if z2%<4032 then if peek (z2%)-32 then 
3048 
goto 6100 
poke a2%,32:poke z2%,69:poke z2%-1024, 
53 

8a2%"z2%:goto 1009 

zi%"-al%+41 

if z1%<4032 then if peek (z1%)-32 then 
32498 

goto 60098 

poke al%,32:poke 21%,69:poke z1%-1024, 
50 

al%"z1%:goto 1200 

zE%-a2%+41 

if z2%<4032 then if peek (z2%)-32 then 
3440 

goto 61928 

poke a2%,32:poke z2%,69:poke z2%-1824, 
53 

a2%"z2%:goto 1008 

z1%=-al%+40 

if z1%14032 then if psek (z1%)-32 then 
3649 

poke al%,68 

goto 6002 

poke al%,32:poke z1%,67:poke zi%-1024, 
1) 

al%"=z1%:goto 12008 


z2%-a2%+40 

if z2%<4032 then if psek (z2%)-=32 then 
3840 

poke a2%,68 

goto 6108 


Spiele Listing 


poke a2%,32:poke z2%,67:poke z2%-1024, 
53 

a2%=z2%:goto 1908 

z1%=a1%+39 

if z1%<4032 then if peek (z21%)-32 then 
4040 

goto 6008 

poke al%,32:poke z21%,78:poke z1%-1024, 
50» 

al%"-zi%:goto 12008 

22%=-a2%+39 

if z2%<4032 then if peek (z2%)=32 then 
42490 

goto 6100 

eg a2%,32:poke z2%,70:poke z2%-1024, 
3 

a2%"=z2%:goto 19008 

z1%-al%-1 

if z1%>3231 then if peek (z1%)-32 then 

4449 

goto 60208 

poke al%,32:poke z1%,78:poke z1%-1024, 
50 

al%"z1%:goto 12008 

z2%=-a2%-1 

if z2%3231 then if psek (z2%)=32 then 
4540 

goto 6190 

poke a2%,32:poke z2%,70:poke z2%-1824, 
53 

a2%"z2%:goto 1008 

z1%=-al%-41 

if z1%>3231 then if peek (z1%)=32 then 
4849 

goto 60808 

poke al%,32:poke z1%,78:poke z1%-1024, 
52 

al%=-z1%:goto 1209 

ze%-a2%-41 

if z2%3231 then if peek (z2%)=32 then 
5e40 

goto 6128 

poke a2%,32:poke z2%,78:poke z2%-1024, 
53 

a2%=z2%:goto 1900 

c1%=peek (z1%) 

if c1%75 or c1%79 then 1208 
c1%=c1%-74 

on c1% goto 56480, 6200, 6800,65602, 7080 
c2%=peek (z2%) 

if c2%<75 or c2%>79 then 1000 
c2%=c2%-74 

on c2% goto 6500, 5300,56900,56700,7000 
mi%-5:char 1,18,2,str$ (m1%):goto 1288 
m2%-5:char 1,35,2,str$ (m2%):goto 1088 
if k1%-® then k1%=3:char 1,18,1,str$ 
(k1%) 

goto 12088 

if k2%=-® then k2%"=3:char 1,35,1,str$ 
(k2%) 

goto 1088 

if k1%<>1 then 1298 

k1%=2:char 1,10,1,str$5 (Ck1%):gosub 
11808:goto 1280 

if k2%{>1 then 1900 

k2%=2:char 1,35,1,str$ (k2%):gosub 
1100808:goto 1998 

k1%=-1:char 1,18,1,str$ (k1%):goto 1208 
k2%=1:char 1,35,1,str$ (k2%):goto 19908 
on sp% goto 7010,7920 

if k1%=1 then 7050 

if k1%-3 then 7078 

goto 1208 

if k2%=1 then 7058 

if k2%=3 then 7070 

goto 1998 

gosub 10508:goto 1098 

gosub 10008:goto 1908 

on sp% goto 1200,1080 

tt%=peek (t%t+x%):t%=t%rx% 

if tt%>74 then on sp% goto 1200, 1008 
sound 3,7080,28:poke t%-1024,72 

for i=-1 to 'S 

poke t%,95:poke t%,96:next :poke t%,32 
if tt%>78 then on sp% goto 1200, 1008 
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if sp%=1 then k2%-=9®:m2%=®:goto 8120 

if sp%=2 then k1%=9:m1%-®:goto 89998 

if b%=-1 then a1%-3931 

if b%=2 then a1%-3663 

char 1,10,1,str$ (ki1%):char 1,10,2, 

strS (m1%):goto 1908 

if b%=1 then a2%-3932 

if b%=2 then a2%-3666 

char 1,35,1,str$ (k2%):char 1,35,2, 

strS5 (m2%):goto 1208 

on sp% goto 9020, 9040 

if k1%<>2 then 1018 

if b%=2 then 12000 

goto 1018 

if k2%<>2 then 1218 

if b%=2 then 12008 

goto 1218 

print "[Cclr,4down,cbm 73/X[CSspaces, 

cbm 2]6[2spaces,cbm 7]WXC3spaces, 

cbm 216C3spaces]G66[3spaces]G[3spaces, 

cbm 7]WXC2spaces,cbm 2)6[5spaces, 

cbm 7JWU” 

print "U Z[6shift -IYC2spaces]2 
C3shift -IY Z[C2shift -IY 2[3shift -IY 
[2spaces]Z[6shift -IY U” 

print ”V Ccbm -JIULEPiJVUL4pPIi)X VXWU W 
[C4pilUULEpiJULshift +) U” 

print "UV UX [Ccbm 2I6[3spaces]G 
C4spaces,cbm 7JW[Lshift +,2spaces, 

cbm 216[2spaces)6[l2spaces,cbm 7,cbm -)] 
X[4spaces,cbm 2J6[3spaces]JG [chbm 7J4WU 
Kr 


print "U X Z[C2shift -IY WY 2Y Ccbm -)Y 
VLpurIMMClcbm 73V Z[shift +] 2Y 2X 2 
[2shift -]Y W U” 
print "ULl2spaces]Z[4pi)Y UV [chbm -, 
shift +] UL WUUX LU Ccbm -,shift +) U 
Z[4pi)YC[C2spaces)V” 
print "UYZUCshift +]L [Ccbm 2]6 
C2spaces,cbm 7]V [cbm -,shift +] LUY 
Ccbm 2166 [Ccbm 712UV [Ccbm -,shift +] 
Ul2spaces,cbm 216 [cbm 7JL[cbm -] 
LyZu” 
print "UVL3PiJUUUWX WX Ccbm 216 
Ccbm 7JUL4shift -JV Ccbm 236 [Ccbm 7) 
WX WUUUVUUL3PIJUU” 
print ”"VX Ccbm 216[5spacesJG6G[Sspaces, 
cbm 7]U UUUUUV UVLSspaces,cbm 216 
[Sspaces]G [cbm 7JWU" 
print "U 2[C7shift -]1Y Z[L2shift -JIULU 
[C4piJULUL2shift -IY 2[C7shift -IY U” 
print "UV WL7PiIX WEI3PIiIUXLHspacesIWU 
[3piJX WL7pi)X U” 
print "V[2spaces,cbm 216[3spaces]G 
[5spacesJ6[l2spaces]6[l2spaces,cbm 712Y 
[C2spaces,cbm 216[2spaces]G6G[Sspaces]G 
C[3spaces]G[2spaces,cbm 70” 
print "UV Z[shift -IY Z[5Sshift -JIUUUUVY 
Ccbm -,shift +) ZUUUUULSshift -)IY 2 
[shift -IY U” 
print "UV WLpi)X Ccbm -JTLshift +,3piJX 
C2spaces]L[cbm -]V WX ULlshift +JIL 
C2spaces]W[L3pi,cbm -JT[shift +3 WLpiIX 
ur 
print "VC2spaces,cbm 1)6[2spaces, 
cbm 7,cbm -JTCshift +JX Ccbm 16 
Ccbm 7]2[shift -]UVX[4spaces)]WuU 
Cshift -]Y Ccbm 216 Ccbm 7JWCcbm -IT 
[shift +,2spaces,cbm 2]G[2spaces, 
cbm 7JU” 
print "UV ZC3shift -,cbm -JIT[shift +] 2 
C2shift -]/X [cbm 296 Ccbm 7)2C0rvs)IRR 
Coff]Y Ccbm 2I6G [cbm 7JWVL2shift -IY 
Ccbm -IT[shift +,3shift -IY U” 
print "U [Ccbm -JUCshift +,3piJX WL2pi) 
X Z[C2shift -IV[flashon,cbm 1100 
Cflashoff,cbm 7JUCL2shift -IY WL2pi)X W 
C3pi,cbm -JV[shift +) U” 
print "UV Ccbm -JVUCshift +)3X [Ccbm 216 
C4spaces]G[2spaces,cbm 7JWLpi)XW 
C2spaces]XW[Lpi)lXC2spaces,cbm 216 
C4spaces]G [cbm 7JW[cbm -JV[shift +) 
ur : 
print "U WLpi)X Ulgrn]Uuuuuulchbm 7JU 
C2spaces,cbm 216[6spaces)]6G[2spaces, 
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18728 For i=-4043 to 49071:poke i,B6:next i 
10730 gosub 13099 

10778 m1%"®: m2%=0: b%=2:31%=3663: a2%=3666 
10798 sound 1,596,5:return 

11000 poke 2022,4:poke 2023,1:poke 2024,9 
11810 vol ®:sound 3,850,50:for i=-® to 8 step 


cbm 7JUCgrn]uUuUUUUULcbm 7JV WLpPiIX U” 
18208 print ”"UY Ccbm 2]6[2spaces)6G[6spaces]G 
Ccbm 7I2VYLC2spaces]JLZ2VY [Ccbm 296 
[6spaces]G[2spaces]G [chbm 712VChome)” 
10210 For i=3192 to 3231:poke i,86:poke i- 
1824,46:next i 


102208 For i-=4032 to 4071:poke i,86:next i 

10225 k1%*9:k2%-® 

10230 gosub 13000 

10282 m1%=0®:m2%=B: b%=1:a1%=3931 :a2%=3932 

10308 sound 1,596,5:return 

18588 print "[Cclr,Sdown,ll1spaces,cbm 7JUX 
Ecbm 216[3spaces]G [cbm 73WLpiI)X 
Ccbm 2)6C03spaces]6[7spaces]G [chm 7] 

WU ” 


print "Y[9spaces]ZU Z[Sshift -JY 
[3spaces]2[shift -]Y 2[4shift -IL 
[4shift -Iy U” x 
print ”"[redJT[9spaces]TLlcbm 7JV WLSpi) 
XC3spaces]WULshift +] WLSPIiIX U” 

print ”"C[redJT[9spaces]JT[cbm 216 
[2spaces]G[3spaces]G [cbm 732 Y WX 
[2spaces,chbm 2]6[2spaces]G G[l2spaces]G 
C2spaces,cbm 7]JU” 

print "CredJU[lSspacesJUlchm 71V 2 
L2shift -JU Ulshift -]VL[chm -]1Y 
[3spaces]Z[2shift -JUU WUL2shift -IY 

u" 
print "[redJT[Sspaces]T[chm 7JU 

Ccbm -JUVX WL2piJVL2pi JUUULpi Ju 
[shift +,pur]JK[L3spaces]JK[Lcbm 7,cbm -JU 
[shift +] U” 
print "[redJTL9spacesJT[cbm 7JV WLPIiIX 
[3spaces,cbm 216[5Sspaces]G[2spaces, 
cbm 7JWLPpiJUVUWVUL2piIX U” 
print "[red3U[l9spaces]Ulchm 7JUY 

Ccbm 216 Ccbm 7]2[shift -]UUUUUUUUY 
[4spaces,cbm 216[2spaces]6G[4spaces, 
cbm 7JU” 
print "[red]T[9spaces]T[cbm 7J3ULUU UX 
[3spaces,cbm 216[2spaces,cbm 7,cbm -JU 
[shift +J ZC[2shift -,rvsIRLoff, 

Eshift -,rvsIRloffJULL2shift -IU0” 
10608 print "[CredJT[LSspacesITLchm 71UX 

Ccbm 216 [chbm 7,cbm -)YCflashon, 
cbm 1JNCflashoff,cbm 712[2shift -IY U 

Ccbm 2]6 [cbm 7,cbm -JU[lshift +, 
flashon,cbm 1]J0Cflashoff,cbm 7,chm -, 
shift +,flashon,cbm 1)0Lflashoff, 
cbm 7,cbm -JUUUU” 
print "[CredJU[l9spaces)Ulchm 71V 2 
[shift -JVUL2piJVL3pi)X UV UV VLpilX WX W 
C3pi)u”r 
print "C[Cred]T[9Sspaces)I[lchm 7] uX 
[2spaces,cbm 216[3spaces]G[2spaces, 
cbm 7]HHV VL3spaces]ZY[l2spaces,cbm 216 
C2spaces,cbm 70” 
print "[redJT[9spaces)JT[Lcbm 73V U 
C2spaces]UlLLUVVVULcbm -JULshift -, 
shift +] U YZLLYZ[Lshift -IY U” 
print "CredJUlSspaces)Ulchm 7IU 

[cbm -JYC2spaces,cbm 216[3spaces]JG 
C2spaces,cbm 7JWULshift +] U [cbm -] 
VUUVL2piIX U” 
print "[red]T[9spaces]IT[cbm 74 

Ecbm -JUUUUUUVUVL2spaces,cbm -, 
shift +] U VL3piJXCHspaces)IV"” 
print "Cred]T(9spaces]T[lchm 7] 

Ccbm -JX[2spaces,cbm 216[3spaces]G 
[2spaces,cbm 7]2UX UV Ccbm 216[4spaces, 
cbm 712Y[l2spacesJV” 
print "[redJU[l9spaces)Ulchm 71V U 
[2spacesJUUUUL4shift -1UX ZUUUY 2 
[shift -JuUUY u” 
print "CredJTC9spaces]ILchm 73V 

Ccbm -JYC3spaces,cbm 216 [cbm 71WUUU 
[shift +,2spaces,cbm -,shift +JL 
[cbm -,shift +] [Lcbm -]JUVULshift +] U” 
print "X[9spacesJUV WLPLIUVUUY WEZPIiIX 
[2spaces]WV VX WL3PiIJX U” 
print "[11spaces]JVUY [cbm 2]6[4spaces]JG 
C2spaces,cbm 7JLUYC3spaces,cbm 216 6 
[Sspaces]G [cbm 7]2UChomel"; 

For i-3283 to 3231:poke i,86:poke i- 
1024,46:next i 
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11015 
11028 
11030 
11045 


11050 


11860 
11870 
11975 
11080 
12000 
129805 
12910 
129208 
129830 
12049 
12058 
12055 
12068 
12070 


12085 
12030 


12128 


12230 
122508 
122708 
12298 
12318 
12330 
12358 
12370 
12380 
12398 


12490 


12410 
13008 
13010 


13015 


13028 
13025 
13038 
13035 
13049 
13050 
13882 
15900 
15018 
15020 
15030 
159490 
159050 


15960 
150708 
15088 
15098 


15190 
15110 
15120 
15130 


15140 
15150 
15169 
15170 
15188 
15198 
15298 
15218 


‚B:vol i:for r=1 to S:next r,i 

print ”"Chome,21down]”; 

sound 3,850,5® 

for i=-1 to 28:print a$Cli):next i 

for i-858 to 200 step -50:sound 3,i,3: 
next i 

for i-3876 to 3996 step 49:poke i,38: 
poke i+2,32:next i 

poke 3322,32:poke 3362,32 

poke 3401,85:poke 3490,85:poke 3399,97 
sound 1,596,28:sound 2,739,28 

on sp% goto 1200,1000 

1$5-"[39spaces)” 

for i=® to 2:char 1,90,i,1$:next i 
poke 2823,1:poke 2024,9 

poke 3359,32:poke 3357,B81:poke 3399,32 
poke 3400,32:poke 3401,32 

poke 3362,84:poke 3322,84 

for i=3876 to 3956 step 49 

poke i-1824,72:poke i-1922,72 

poke i,95:poke i+t2,95:next i 

for i=1 to 380 step 5:sound 3,550+i,3: 
next i 

sound 3,850,1®® 

For i=1 to 23:print chr$ (27)"v”:next 
z 

For i=8 to Bd step -.5:for r-1 to 25: 
vol i:next r:next i 

print "[clr,28down,blk] spieler” 
print tab(4);sp% 

print "[Cdown) hat es" 

print "C[Cdownlgeschaft"” 

print "EdownJ!!!!ıı!ı" 

print "Cdoun, 2spaces]neues” 

print "[down) spiel ?"” 

print "Cdown, 2spaces] (n/ J)[L3down]” 
poke 239,08:get key s$ 

if s$<>"n"” and s$<>”j” then print ” 
[S5up]”;:goto 12378 

if s$="j” then print "C2home,clr]”: 
goto 969 

print "[C2home,clr]":end 


char 1,1,0,”"[rvs,red] spieler[2spaces) 
1 ” 

char 1,26,0,"[grn] spieler[2spaces]2 
Coff,b1k]" 

char 1,2,1,”key nr.:” 

char 1,27,1,”key nr.:” 

char 1,2,2,”energie: 9" 

char 1,27,2,”energie: ®" 

char 1,18,1,str$5 (k1%) 

char 1,35,1,str$5 (k2%) 

return 

dim a$(20) 

a5(1)=-"[C4spaces]J"” 
a$(2)="C3spacesI2UyY” 
85(3)=-"[3spacesIUHU” 
a5(4)="C3spaces,cbm -]S[shift +)” 
a$(5)=-"C3spaces,cbm -,rvs]PLoff, 
shift +]” 

a5(6)-"[2spaces]2[lcbm -JULshift +JY" 
a$(7)=-"[2spaces,2cbm -JVUL2shift +3” 
a8(CB)-" ZCchbm -IHUHLShift +IY” 
a5(9)=-" Ccbm -JVUCcbm -JULshift +JU 
[shift +)” 

asl190)-" C3chm -IHL3Shift +3” 
asC11)-"Z2L2chbm -IHHHL2sShift +)Y” 
asc12)=-"[3chbm -IIHIL3IShift +9” 
a$C13)=-"[cbm -,rvsIRLoff,cbm -I3JHJ 
Cshift +,rvsIJRloff,shift +)” 
aslt14)=-"WEpiIHPHPHLPIIX” 
a$(C15)-"C2spaces)WHHHXL2spaces]" 
a$C16)=-"[C3spacesIIPp1" 

a$(17)"=-"Ccbm 1,3spaces,cbm *]J Ccbm 
a$(18)="[Ccbm 1,3spaces,chm *] [Lcbm 
a$(C19)="[Cchm 1,3spaces,cbm *] Cchbm 
asl28)=-"Chblk]” 

return 
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Mit „Skate Rock 
einSkateboard gewinnen 


Nach monatelangen Kämpfen zwi- 
schen den einzelnen Skateboard- 
Fahrern der Stadt soll nun endgül- 
tig entschieden werden, wer zur 
Elite unter den Fahrern gehört. 
Auf einem großen Meeting soll 
der Wettkampf stattfinden. Soweit 
zum Hintergrund von Skate Rock. 
Zu fetziger Hintergrundmusik muß 
der Spieler sein Skateboard über 
verschiedene Parcours steuern 
und jeweils acht Flaggen einsam- 
meln. Natürlich fehlt es nicht an 
Hindemissen. Parkende Autos, 


Fußgänger und Modellflugzeuge 
lassen jeden Durchgang zum Va- 
banquespiel werden. 

Für die RUN-Leser haben wir ein 
besonderes Bonbon parat. Der 
beste „Skater" bekommt vom eng- 
lischen Hersteller „Bubble Bus 
Software" ein Skateboard, um sei- 
ne Fähigkeiten auch ohne Compu- 
ter unter Beweis zu stellen. Als 
Trostpreise werden 10 T-Shirts un- 
ter den Einsendern verlost. Was 
ist zu tun? Im Hauptmenü von Ska- 
te Rock werden die Namen der 


Fußgänger soll- 
ten nicht über- 


fahren werden 


verschiedenen Strecken ange- 
zeigt. Schreiben Sie den Namen 
vom 10. Level auf eine Postkarte 
und senden Sie diese an: 
CW-Publikationen 

Redaktion RUN 

Stichwort: Skateboard 

Postfach 40 04 29 

8000 München 40 

Der Einsendeschluß ist der 
21.02.1987 (Datum des Poststem- 
pels). Gehen in der Redaktion 
mehr als eine richtige Lösung ein, 
entscheidet das Los. (rg) 


Programmname: Skate Rock 


lIdee/Story: 

Grafik/ Animation: 
Sound/Sprache: 
Schwierigkeitsgrad: 

Spielspaß: 

Spieltyp: Geschicklichkeitsspiel 
Spielerzahl: 1 

Besonderheiten: — 

Hersteller: Bubble Bus Software 
Preis: — 


Vertrieb: — 


Fortsetzung von Seite 53 


Technik und Leistung einer Mannschaft mittels Stati- 
stiken bis ins Detail analysiert werden. Aufgrund 
dieser Erkenntnisse sollen aber auch stereotype 
Spieltaktiken durchbrochen und neue Strategien 
entwickelt werden. 

Vorgestellt wurde unter anderem eine Online-Lö- 
sung für Volleyball: Auf einem portablen Personal- 
computer werden sämtliche Spielhandlungen im 
Verlauf eines Volleyballmatches erfaßt und inner- 
halb einer Punkteskala bewertet. Aus der nachfol- 
genden, statistischen Auswertung wird beispielswei- 
se ersichtlich, wieviele Anschläge, Pässe oder An- 
griffe die Mannschaft und jeder einzelne Spieler ef- 
fektiv und im Durchschnitt pro Match gemacht hat, 
welche Spielhandlungen zu einem Punkt geführt ha- 
ben und welche erfolglos waren oder wie oft Attak- 
ken in welchem Bereich des Netzes ausgeführt wur- 
den. Jeder Spieler erhält einen Auszug mit der Aufli- 
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stung und Bewertung seiner Spielaktionen. Dem 
Trainer geben solche Analysen Informationen über 
die Stärken und Schwächen der eigenen Mannschaft 
und allenfalls auch des Gegners. Dementsprechend 
kann er das weitere Training modifizieren. 

Die Magglinger Woche hinterließ den Eindruck, daß 
hochentwickelte EDV-Lösungen für den Sport rar 
sind. Als Beispiele dafür möchten auch die im Aka- 
demischen Sportverband Zürich (ASVZ) eingesetz- 
ten Programme gelten. Sie sind weitgehend vom In- 
stitut für Automatik der ETH Zürich entwickelt wor- 
den und werden bei Hochschulmeisterschaften 
Großanlässen eingesetzt. 

Auch das an der Universität von Montreal entstande- 
ne Konditionstrainings-Programm Expressmann, das 
bei der kanadischen Armee im Einsatz steht, gehört 
zu dieser Kategorie. Es erstellt Sportlern einen indi- 
viduellen Jahres-Trainingsplan für Radfahren, 
Schwimmen, Joggen oder Geräte-Krafttraining. 


Mauer, Stein und Eisen bricht. 


Für einen richtigen Gangster ist der Knast das Allerletzte. Das ! break gibt es für den C 64 und für Schneider. Und den neuen 
Essen kann man vergessen, und der Rest ist auch nicht viel ı Gesamtkatalog gibt es für jeden, der uns den Coupon schickt. 
besser. Da gibt es nur eine Lösung: raus hier! Ohne Rücksicht ı Name 


auf Verluste. Und dann wird der ganz große Coup geplant, nach | stae___ 0 "soft 
dem man für immer ausgesorgt hat. Aber draußen wartet nicht !' ız________on s0 


nur die Freiheit. sondern auch der härteste Cop der Stadt! Jail- ı An: ariolasoft, Cart-Bertelsmann-Str. 161, 4830 Gütersioh Von Experten 
für Experten. 


Spiele 


Tarzan 

im Kampf 
gegen einen 
Eingeborenen 


Um es vorwegzunehmen: Martech 
hat mit „Tarzan“ einen Hit für 
Hüpf- und Springspiel-Fans ge- 
landet. Ein Genuß ist schon die 
Kassettenladeroutine. Hier ertönt 
nach dem altbekannten Jonny 
Weißmüller-Schrei (für den C64 
gesampled) eine fetzige Titelmelo- 
die, die sich in Variationen im 
Spielverlauf fortsetzt. Von Bongo- 
trommeln bis hin zum abendlichen 
Zirpen der Grillen ist in der Ge- 
räuschkulisse alles vertreten. 


Toller Sound 


Tarzan ist wieder einmal in Aktion. 
Jane ist in Gefahr. Sie wird vom 
Häuptling des Wamabostammes 
Usanga gefangengehalten und 
soll dem Geier „Ska“ vorgeworfen 
werden. Um sie zu retten, muß 
Tarzan die sieben "Augen des Re- 
genbogens" — sieben Juwelen — 
innerhalb von drei Tagen finden 
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Jonny 


im 64 


und dem Häuptling übergeben. 
Affen hatten die Juwelen aus 
Übermut gestohlen und im Urwald 
verstreut. Fallgruben, Treibsand, 
giftige Pfeile und wilde Tiere lie- 
gen auf Tarzans gefährlichem 
Weg. Wird er von Speeren getrof- 
fen oder fällt er in Treibsand ver- 
streicht die zur Verfügung stehen- 
de Zeit schneller. So können die 
drei Tage sehr schnell vorbei 
sein. 

Neben der Joystick-Geschicklich- 
keit sind in diesem Hüpf- und 
Springspiel auch Taktik und Stra- 
tegie gefordert. Ein schier unend- 
liches Gewirr von Trampelpfaden 
im Dschungel, Wegen in Dörfern 


Szene aus 


Greystock — 
die Legende von 
Tarzan“ 


’ 


Nachdem Tarzan erfolg- 
reich Bücher, Film und 
sogar Comics erobert 
hat, schwingt er sich 
Jetzt im C64 von Liane zu 
Liane. Jane ist in Gefahr 
und muß von ihm geret- 
tet werden. 


Henmmliepr 


und Gängen in Höhlen stellen den 
Orientierungssinn auf eine harte 
Probe. Viele Aktionen erfordern 
bestimmte Hilfsmittel, die erst ge- 
funden werden müssen. So sollte 
der Held der Geschichte keine 
Höhlen betreten, ohne eine Ta- 
schenlampe dabei zu haben. Sonst 
hat er sich im Dunkeln schnell ver- 
laufen und findet nicht mehr aus 
der Höhle heraus. 


Wichtige Hilfsmittel 


Spiele-Fans, die keine Geduld 
und Ausdauer oder keine Freude 
an Hüpf- und Springspielen ha- 
ben, sollten die Finger von diesem 
Bildschirmabenteuer lassen. Für 
alle anderen bedeutet „Tarzan" 
lang anhaltenden Spielspaß. 


Programmname: Tarzan 
0 l 2 

Idee/Story: 

Grafik/ Animation: 


Sound/Sprache: 


Schwierigkeitsgrad: 


Spielspaß: 

Spieltyp: Hüpf- und Springspiel 
Spielerzahl: ] 

Besonderheiten: — 

Hersteller: Martech 

Preis: k.A. 

Vertrieb: Micropool 


Nach „Star Wars“ hat 
George Lucas mit „La- 
byrinth" wieder einen 
Kinohit gelandet. Lucas- 
film präsentiert gleich- 
zeitig auch das dazu pas- 
sende Spiel für C64- 
Besitzer. 


Mit ihren vier Spielen „Rescue on 
Fractalus“, „Ballblazer", „Koronis 
Rift" und „The Eidolon" hat die 
„Lucasfilm Games Division“ der 
Softwarebranche jedesmal neue 
Impulse gegeben. Auch ihr 
neuestes Projekt, die Umsetzung 
des Kinofilmes „Labyrinth“ in ein 
Computerspiel hat einen innovati- 
ven Character. Im Film entführt 
Jarreth, der Herrscher der Kobol- 
de, den kleinen Toby. Sarah, To- 
by's Schwester, macht sich auf den 
Weg zu Jarreths Burg, um ihren 
kleinen Bruder zu befreien. Der 
einzige Weg zur Burg führt durch 
ein gewaltiges „Labyrinth“. Sarah 
und ihre Gefährten Ludo, Sir Did- 
myus und Hoggle müssen sich be- 
eilen, denn nach Ablauf von drei- 
zehn Stunden wird Jarreth den 
kleinen Toby unwiderruflich in ei- 
nen Kobold verwandeln. 

Im Spiel „Labyrinth“ ist die Story 
ähnlich. Mittels eines reinen Text- 
adventures gilt es zuerst den Weg 
ins Kino zu finden. Dort wird der 
Film „Labyrinth“ gezeigt. Plötz- 
lich, zu Beginn der Vorstellung, 
erscheint Jarreth und entführt den 


Alph und Ralph geben Tips 


Superspiel von 
George Lueas 


Spieler in sein Reich. Dreizehn 
Stunden hat man Zeit, aus dem La- 
byrinth zu entkommen. Wer es 
nicht schafft, wird in einen Kobold 
verwandelt und muß Jarreth für 
alle Zeit dienen. Zahlreiche Ge- 
stalten bevölkern die Gärten und 
Höhlen in Jarreths Königreich. 
Von einigen darf man Hilfe erwar- 
ten, meist jedoch nicht ohne die 
entsprechende Gegenleistung. 
Wer den Weg durch eine Wand 
gefunden hat, kommt zu Alph und 
Ralph. Diese lassen sich zu hilfrei- 
chen Bemerkungen verleiten, so- 
bald man alle Kerkertüren geöff- 
net hat. Die „Wand der helfenden 
Hände“ kann der Spieler mit „con- 


gratulate wall“ aktivieren. Doch 
dies ist nur der Anfang. Bis zum 
weisen Mann mit dem Weg aus 
dem Labyrinth ist es noch weit. 
Die Graphik der Lucasfilm-Spiele 
war schon früher ein Leckerbis- 
sen. „Labyrinth“ schlägt in dieser 
Beziehung „Koronis Rift" oder 
„Ihe Eidolon" um Längen. Die 
großen, farbenprächtigen Figuren 
haben fast Zeichentrickfilmquali- 
tät; das Scrolling ist absolut ruck- 
frei und auch der Hintergrund 
steckt voller Details. Wenn die Fi- 
guren zu dem Spieler „sprechen“, 
tun sie dies in Comic-Strip-Manier. 
Die Sprechblasen sind in die Bil- 
der integriert. Eine akustische 


Im Irrgarten hilft der weise Mann weiter 
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Sprachausgabe ist nicht vorhan- 
den. Trotzdem bietet das Spiel 
auch einige Hörgenüsse: täu- 
schend echt klingende Geräu- 
sche und die aus dem Film stam- 
mende Musik. Einige sehr ange- 
nehme Optionen vervollständigen 
das Spiel. Die Eingabe der Befeh- 
le erfolgt am besten per Tastatur. 
‚Dabei wird der aktuelle Befehls- 
vorrat stets angezeigt. Der letzte 
Befehl bleibt stehen. Besonders in 
den Katakomben ist dies sehr vor- 
teilhaft, da es hier auf schnelle Re- 
aktion ankommt. 

Auf der Originaldiskette können 
bis zu drei Spielstände abgespei- 


chert werden. Wer also trotz der 
Hinweise von Alph und Ralph die 
falsche Tür erwischt, muß nicht 
ganz von vorne beginnen. 

In einem Irrgarten weiß man nie, 
was sich hinter der nächsten Ecke 
verbirgt. Genau dies ist auch das 
vorherrschende Gefühl beim 
Spielen von Labyrinth. Vergessen 
Sie deshalb auf keinen Fall Ihre 
Videokamera — Ihre Freunde 
werden sonst glauben, Sie hätten 
dies alles nur geträumt. Am Ende 
des Abenteuers kann sich der 
Spieler die Aufnahmen dann im 
heimischen Wohnzimmer anse- 
her. (cp) riesen 


Programmname: Labyrinth 
0: 

Idee/Story: 

Grafik: 

Sound: 


Schwierigkeitsgrad: 


Spielspaß: 

Spieltyp: Action-Adventure 
Spielerzahl: | 
Besonderheiten: Filmvorlage 
Hersteller: Lucasfilm Games 
Preis: 


Vertrieb: 


Hingemaecht beim 
Sehüsselbau 


Werner-Fan Georg Ausfelder gibt 
Tips zum erfolgreichen Schüssel- 
bau beim Werner-Spiel. 

Das Schüsselbauen ist eine der 
kniffligsten Disziplinen beim Wer- 
ner-Spiel. Zahlreiche Bauteile er- 
lauben es, verrückte Motorräder 
zusammenzubasteln, die bei den 
Kunden heiß begehrt sind. Aller- 
dings kann die Kiste erst dann ver- 
hökert werden, wenn sie von zwei 
kleinlichen Polizisten als ver- 
kehrstauglich bewertet worden 
ist. Werner-Spieler stehen folglich 
vor dem Problem, eine Maschine 
zu entwerfen, die einerseits die 
Kontrolle überlebt und anderer- 
seits einen möglichst großen Ver- 
kaufserlös (= Flaschbier) bringt. 
Wer gleich am Anfang eine Origi- 
nalhorex zusammenbaut, um sich 
bereits beim ersten Durchgang 
bei den beiden Cops vorbeizumo- 
geln, wird beim Verhökern der 
Schüssel schwer enttäuscht — 
Werners Mechaniker, Ohlfuß, 
taucht auf und fängt beim Anblik- 
ken der öden ungetunten Schüs- 
sel, anzu Kotzen...... 

Fährt man bei den Polizisten mit 
einem gechopperten Motorrad 
vor, wird natürlich alles bemän- 
gelt. Sind beim Zusammenbau 
nicht ausreichend Originalteile 
verwendet worden, so muß die 
komplette Mühle wieder zerlegt 
werden — folglich niemals einen 
fremden Rahmen und Original- 
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Teile verwenden, da zum Aus- 
tausch des Rahmens stets alle an- 
deren Teile entfernt werden müs- 
sen. Nach dem ersten Vorfahren, 
müssen alle bemängelten Teile 
ausgetauscht werden. Dabei muß 
jeder Griff sitzen — die Uhr läuft 
mit! 
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War man schnell genug und hat 
die zweite Polizeikontrolle über- 
standen, so kann die Maschine 
verhökert werden. Leider haben 
die Käufer verschiedene Vorstel- 
lungen vom perfekten Zweirad. 
Meist handelt es sich bei dem 
Kunden um Ohlfuß, der nach dem 
Motto „Je wilder, je lieber" ent- 
sprechend dem brutalsten Auf- 
bau, seine Bierflaschen als Bezah- 
lung springen läßt. 

Ab und zu kann es, vor allem beim 
Bau des „Red Porsche Killers" 
passieren, daß ein anderer Kunde 


(Popper) erscheint, der seiner- 
seits Chopper zum Kotzen findet. 
Folge: keine Punkte. Nehmen bei 
„Werner" mehrere Spieler teil, so 
sollte man kein Risiko eingehen 
und lediglich einen zweimotorigen 
Chopper bauen. Ein solcher wird 
von Ohlfuß meistens mit etwa 70 
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Flaschbier-Re- 
kord beim Wer- 
ner-Spiel 


Bierflaschen bezahlt — ein recht 
gutes Ergebnis. Den „Red Por- 
sche Killer" sollte man nur bauen, 
wenn man sich mit den Einzeltei- 
len sehr gut auskennt und schnell 
montieren kann! Da vier Motoren 
vorhanden sind, spart man sich 
bei der Demontage viel Zeit für 
die Kleinteile. Vergaser und Aus- 
puff können gleich vier mal am 
Stück ausgebaut werden. 

Georgs Rekordergebnis beim Bau 
des Porsche-Mörders liegt bei 
hundert Bierflaschen. Wer schafft 
mehr...? 
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RUSHWARE Produkte erhalten 
Sie in den Fachabteilungen von HER | Kaurhor Quelle KARSTADT 
= sowie in allen gutsortierten Computershops und im guten Versandhandel. 


COMPUTER SOFTWARE Vertrieb: RUSHWARE - Mitvertrieb: Micro-Händler - Distribution in Österreich: Karasoft 


Spiele 


Die Murmel rollt 
wieder 


„Bobby Bearing" ist auf der Suche 
nach seinen vier Brüdern, die sich 
in der Welt der Metallflächen ver- 
irrt haben. Sie zu finden und nach 
Hause zurückzubringen ist seine 
Aufgabe. Dabei stellen sich ihm 
die „bösen Bearings" in den Weg. 
Diese schwarzen Murmeln betäu- 
ben jeden, der sich in ihren 


Machtbereich wagt. Ähnlich wie 
in vorausgegangenen Spielen die- 


ser Art gibt es Aufzüge, verborge- 
ne Schalter und gefährliche Fal- 
len. Sich ständig hebende und 
senkende Felsquader versuchen, 
Bobby zu zerquetschen. Gelingt 
ihnen dies, verliert der Spieler 20 
der 999 zur Verfügung stehenden 
Zeiteinheiten. Zum Trost kann die 
Kugel nicht über den Rand stür- 
zen. Dies ist wichtig, denn die 
Steuerung ist problematisch. 
Meist scheint die Murmel selbst 
nicht zu wissen, wo sie hin will. Die 
Spielidee stammt eindeutig von 


Ein komplizierter 
Parcours ist mit 


der Kugel zu 
durchlaufen 


„Spindizzy“, die einzelnen Screens 
ähneln denen der Vorlage über- 
deutlich. Die Bildschirmfarben 
sind so fröhlich wie der Himmel im 
November. Sound ist Luxus und 
stört nur beim Spielen — ergo wur- 
de gleich ganz darauf verzichtet. 
„Bobby Bearing“ ist ein teures 
Sammelsurium aus bisher erschie- 
nen Spielen. Ariolasoft wirbt für 
dieses Spiel mit dem Slogan „Roll 
dich oder troll dich“ 


(cp!) 


Programmname: Bobby Bearing 


“ 
Idee/Story: 

Graphik: 

Sound: 

Schwierigkeitsgrad: 
Spielspaß: 

Spieltyp: Murmel im Irrgarten 
Spielerzahl: 1 
Besonderheiten: 

Hersteller: The Edge 

Preis: (Kass/Disc) 39.—/59.— 


Vertrieb: Ariolasoft 


Prodigy 


Wie aus qgutunterrichteten 
Kreisen zu vernehmen war, ist es 
dem Maschinenzauberer Ward- 
lock erstmals gelungen, in Mech- 
world organisches Leben zu er- 
zeugen. Die Labors, in denen dies 
gelang, wimmeln von Globwels 
und Bloberites, den fehlgeschla- 
genen Produkten frührer Versu- 
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che. Bei einem Rundgang durch 
die Mechlabs zeigte uns Ward- 
lock die verborgenen Schlüssel, 
mit denen die Türen der Eis-, Ve- 
gie-, Tech- und Feuerzone gesi- 
chert sind. Zusätzlich gibt es einen 
Monitor, mit dem Solo und das 
menschliche Baby Nejo über- 
wacht werden. Ein Entkommen 
dieser Wesen scheint ausge- 
schlossen. . .“ 


Surrealistisch ist 
die Umgebung 
in der sich Solo 
zurechtfinden 
muß 


Der Spieler übernimmt die Rolle 
von Solo, dem synthetischen 
Mann. Sein Ziel ist es, mit dem 
Baby Nejo in den Weltraum zu ent- 
fliehen und anderes organisches 
Leben zu finden, bevor Wardlock 
mit seinen Experimenten beginn- 
nen kann. Ob dies gelingt, hängt 
davon ab, ob Solo in der Lage ist, 
Sauerstoff, Milch und frische Win- 
deln für Nejo zu organisieren. (Cpl) 


Programme: Progidy 


Spielidee: 

Graphik: 

Sound: 
Schwierigkeitsgrad: 


Spielspaß: 


Spieltyp: Labyrinthspiel 


Spielerzahl: | 


Besonderheiten: 
Hersteller: Electric Dreams 
Preis: (Kass/Disk): 39,—/49,— 


Vertrieb: Activision 


Spielerparadies 
nach Hause geholt 


„Welcome to the Casino. Your 
Amount is 1000 $. You can play 
„Lucky 7 Slots“, „Draw Poker", 
„Reno“ and „BlackJack" ... 

Las Vegas hält jetzt auch auf dem 
C64 Einzug. Mit „Video Vegas" 
werden vier verschiedene 
Glücksspiele angeboten: „Lucky 
7 Slots“ ist ein einarmiger Bandit. 
Der Jackpot beträgt 500 Dollar, 
wenn auf allen drei Walzen die 
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„Z' erscheint. Kleinere Gewinne 
von 5 bis 150 Dollar gibt es für 
Kombinationen aus Glöckchen, 
Kirschen und anderen Symbolen. 
„Draw Poker“ wird mit fünf Karten 
gespielt. Die untere Gewinngren- 
ze liegt bei einem Paar Buben und 
steigert sich bis zum „Royal Flash“ 
mit 5000 Dollar Gewinnsumme. 

„Reno“ ist ein in Europa kaum be- 
kanntes Spiel — eine Mischung 
aus Roulette und Bingo. In einem 
Feld von 80 Zahlen darf der Spie- 
ler bis zu 15 Zahlen markieren. 


Mit dem „Einar- 
migen Banditen“ 
kann man sein 


Spielkapital für 
Poker erhöhen 


Anschließend werden von einem 
Zufallszahlengenerator 20 Ge- 
winnzahlen ermittelt. Gewonnen 
wird ab sechs Richtigen — je nach 
Trefferquote bis zu 50 000 Dollar. 

„BlackJack“ ist nichts anderes als 
die Casinoversion von „l7+4". 
Maximaler Einsatz 20 Dollar, das 
Casino zahlt 2:1, bei Blackjack 
2,5:1. Bei einem Paar kann die 
Hand geteilt und damit der Einsatz 
verdoppelt werden. Der Casino- 
spieler bleibt ab 17 Punkte stehen. 


(cp) Baier 


Programmname: Video Vegas 
0 l 2 3 45 
Idee/Story: 
Grafik: 
Sound: 
Schwierigkeitsgrad: 


Spielspaß: 


Spieltyp: Casino-Spiele 
Spielerzahl: I 


Besonderheit: — 
Hersteller: — 
Preis: — 


Vertrieb: — 


BMX-Simulator 


Zuerst wurden sie als Strampel- 
Äbleger der Motocross-Rennma- 
schinen belächelt. Mittlerweile 
liegen BMX-Fahrräder in der 
Gunst der Kinder und Jugendli- 
chen an erster Stelle. Auf dem 
weihnachtlichen Gabentisch stan- 
den in diesem Jahr so viele BMX- 
Räder wie nie zuvor. Auf Platz eins 


Br 
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der „Top Ten Computergames" 
liegt vielleicht bald der neueste 
„BMX-Simulator“ von Richard 
Darling. Gespielt wird zu zweit 
oder gegen den Computer. Die 
Steuerung ist sowohl per Tastatur 
als auch mit dem Joystick möglich. 
Sieben Kurse stehen zur Verfü- 
gung. Sie alle in der vorgegebe- 
nen Zeit zu bewältigen, erfordert 
viel Geschick. Jedes gefahrene 
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Aus der Vogel- 
perspektive ist 
der Kurs schwer 


zu bewältigen 
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Rennen kann mit „Action Replay" 
nochmals begutachtet werden. 
Eine „Slow Motion“-Option hilft 
beim Analysieren der Fehler. 
Schummeln ist nicht drin. Alle 
Wendepunkte müssen korrekt 
umfahren werden. Abgekürzte 
Runden werden nicht gewertet. 
Die Strecken stellen sehr unter- 
schiedliche Anforderungen. Wir 
haben einige Tricks für Sie ausge- 
knobelt: Wenn Sie allein gegen 
den Computer spielen, wählen Sie 
Joystick II im Modus für zwei Spie- 
ler. Sie haben dann im ersten 
Durchgang keinen Gegner. Ab 
Kurs 2 steigt der Computer für 
den ausgeschiedenen Spieler ein, 
aber Sie sind in der besseren Posi- 
tion. 

Strecke 2: In der zweiten Runde 
fährt der Computer-Racer die 
erste Steilkurve zu hoch an. Hier 
können Sie ihn überholen. 

Strecke 3: Bleiben Sie dicht hinter 
dem zweiten Fahrer und riskieren 
Sie nichts — sammeln Sie Punkte 
durch eine gute Zeit. 
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Strecke 4: In der dritten Runde 
stürzt der Gegenspieler in der 
ersten Kurve. Ziehen Sie vorbei, 
aber vorsichtig. Wenn Sie stürzen, 
überschreiten Sie das Zeitlimit. 

Strecke 5: Nur eine Runde! Wenn 
Sie zu Beginn des Rennens Start- 
position zwei gewählt haben, kön- 
nen Sie einfach bis ins Ziel hinter 
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dem Computer bleiben. Mit Start- 
nummer eins müssen Sie überho- 
len, wenn er auf der kurzen Ge- 
gengeraden stürzt, da Ihnen sonst 
die Zeit nicht reicht. 

Strecke 6: Immer dicht hinter dem 
Gegner bleiben. Ein Sturz bedeu- 
tet das Aus. 

Strecke 7: Bisher haben wir jedes 


Der Replay-Mo- 
dus erlaubt, die 
Fehler nachträg- 


lich zu begutach- 
ten 


Mal das Zeitlimit überschritten, 
aber seien Sie sicher — wir trainie- 
ren eisern. 

„BMX-Simulator“ beinhaltet im- 
mer wieder eine reizvolle Heraus- 
forderung. Dazu kommt eine ex- 
zellente Grafik und eine pfiffige 
Titelmelodie. 

(cp!) MEERE 


Programmname: BMX-Simulator 


| 2 3 5 
Idee/Story 
Grafik: 
Sound: 
Schwierigkeitsgrad: 
Spielspaß: 
Spieltyp: Sportspiel 
Spielerzahl: | oder 2 
Besonderheiten: günstiger Preis 
Hersteller: Richard Darling 


Preis (Kass.): 10 Mark 
Vertrieb: k. A. 


Antiriad 


Es wird einmal sein... . eine ferne 
Zukunft. Nach einem mörderi- 
schen Atomkrieg besetzen Außer- 
irdische die wehrlose Erde und 
versklaven die Bevölkerung. 
Heimlich gründen die Menschen 
eine Widerstandsbewegung. Sie 
verstecken die Neugeborenen 
und ziehen sie in geheimen La- 
gern auf, wo ihnen die alten 
Kampftechniken beigebracht wer- 
den. Als die jungen Krieger her- 
anwachsen, erweist sich einer als 
allen anderen überlegen. Sein 


Name ist Tal. Der Ältestenrat 
übergibt Tal eine Zeichnung der 
heiligen Rüstung „Antiriad“. Er 
soll sie finden und die Eindringlin- 
ge vertreiben. 

Dies ist die Hintergrundstory des 
Hits von „Palace software“. Der 
Handlung nach erinnert das Spiel 
ein wenig an „Hexenküche II" aus 
dem gleichen Softwarehaus. Der 
Held kämpft sich durch zahllose 
Räume, um die heilige Rüstung 
und diverse Ausrüstungsgegen- 
stände zu finden. Geschicklichkeit 
ist Trumpf beim Sprung von einer 
Plattform zur anderen. Die grafi- 
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Die heilige Rü- 
stung ist noch 
recht einfach zu 
finden 


sche Darstellung der unterirdi- 
schen Gänge ist exzellent. Witzig 
gemacht ist auch das Instrumen- 
tenbord der Rüstung, das sich ak- 
tiviert, wenn der Spieler in den 
Kampfanzug klettert. Der Sound 
ist hervorragend. Die anspre- 
chende Titelmelodie und eine 
große Zahl gut simulierter Kampf- 
geräusche lassen hier keine Wün- 
sche offen. Bis Tal mit Ihrer Hilfe 
die Erde befreit hat, werden 
sicher viele spannende Stunden 
vergehen. 


(cp!) az! 5 


Programmname: Äntiriad 
BR 

Idee/Story: 

Grafik: 

Sound: 


Schwierigkeitsgrad: 


Spielspaß: 


Spieltyp: Action/ 
eschicklichkeitsspiel 


Spielerzahl: 1 

Besonderheiten: Änleitungs-Comic 
Hersteller: Palace software 

Preis: (Kass./Disk) 39.—/49,— Mark 


Vertrieb: Rushware 


Tu 


Zu Gast in Kerovnia 


Am Chapel Court, nur wenige 
hundert Schritte entfernt vom Lon- 
don Dungeon, einem schaurigen 
Gewölbe, in dem neugierigen Be- 
suchern gruselige Wachsfigu- 
renszenerien das Fürchten leh- 
ren, dort befindet sich die Aben- 
teuerfabrik von Magnetic Scrolls. 


1984 beschlossen Anita Sinclair 
und Ken Gordon, Adventures zu 
schreiben. Vorbild war der ameri- 
kanische Adventureproduzent In- 
focom, dessen berühmte Textad- 
ventures über einen hervorragen- 
den Parser mit großem Wort- 
schatz verfügen. Anita und Ken 
steckten gemeinsam mit mehre- 
ren Programmierern über ein Jahr 
Entwicklungszeit in ihr Adventure- 
Parsersystem, aus dem schließ- 
lich „The Pawn" hervorging. 


„Ihe Pawn" erzielte in den USA, 
England und hierzulande hohe 
Verkaufszahlen — kein Wunder — 


das Spiel setzt mit über 86 KByte 
Text, 100 Räumen und 30 Spitzen- 
grafiken einen neuen Standard 
auf dem Adventuremarkt. Der 
Parser versteht über 1000 Wörter 
und arbeitet mit hoher Geschwin- 
digkeit. Sätze wie zum Beispiel 
„Lege alles außer den Schlüsseln 
und dem Schwert in die große 
Kiste“ versteht er genauso mühe- 
los wie „Lege das Schwert in die 
Kiste die auf dem hohlen Baum- 
stumpf steht“. 


Entwickelt wurde das Adventure- 
system auf mittelgroßen Home- 
computern: Einem Apple und ei- 
nem Sinclair QL. Inzwischen ar- 
beitet man jedoch mit Atari STs 
und Amigas, die als Terminals an 
eine VAX angeschlossen sind. 


Das Entwicklungssystem von Mag- 
netic Scrolls erzeugt einen ma- 
schinenunabhängigen Master- 
code — Adaptionen für beliebige 
Computersysteme sind mit wenig 
Arbeiten verbunden. Allerdings 


laufen die Spiele nur auf Rech- 
nern mit mindestens 64K-Byte- 
RAM und einem Disk-Laufwerk. 


Die herrlichen Grafiken bei „The 
Pawn“ wurden von Designer Geoff 
Quilley mit einem Atari ST und 
dem Malprogramm Neochrome 
gezeichnet, der Spieltext stammt 
von Rob Steggles. In diesen Tagen 
wird „Guilt of Thieves“, das Folge- 
spiel zu „The Pawn", fertiggestellt. 


Es spielt wieder im Lande Kerov- 
nia, 1000 Jahre nach den Ereignis- 
sen des ersten Teils. Ziel des Spie- 
lers ist es, Mitglied einer Räuber- 
bande zu werden. Dies ist nicht 
einfach, denn der Aufnahme ste- 
hen viele Mutproben bevor, bei 
denen das Geschick des Stehlens 
bewiesen werden muß... 


Ob „Magnetic Scrolls" zukünftig 
mit den originellen Stories der In- 
focom-Spiele mithalten können, 
wird sich zeigen. 

(mn) 


Gedäechtnis- 
training 


„Shanghai“, angelehnt an ein altes 
chinesisches Brettspiel, erinnert 
auf den ersten Blick an „Memory“. 
Wie dort gilt es passende Paare zu 
erwerben, ein Kinderspiel ist dies 
allerdings nicht. Ziel des Spieles 
ist es, die aufgeschichteten Spiel- 
steine vollständig abzubauen. Die 
Zeit zur Suche passender Steine ist 
begrenzt. Der Spieler muß sehr 
sorgfältig auswählen. Nicht jede 
erlaubte Kombination ist sinnvoll. 
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Aus mehreren zusammenpassen- 
den Steinen das falsche Paar zu 
wählen, kann den ganzen Stapel 
blockieren. Trotz seiner einfachen 
Regeln ist „Shanghai“ ein sehr 
kniffliges Spiel. Anfängern hilft 
der Befehl „find“ in schwierigen 
Situationen weiter. 

Im „Competition“-Modus kann 
man „Shanghai“ zu zweit oder ge- 
gen den Computer spielen. Zu- 
sätzlich gibt es noch die Möglich- 
keit, nacheinander mehrere Spie- 
ler gegen die Uhr antreten zu las- 
sen. Der Hi-Score wird dabei ge- 


Werden am An- 
fang Kombinatio- 
nen falsch ge- 
wählt, ist die Lö- 


sung des Spiels 
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8 unmöglich 


speichert. Dies erhöht den Reiz 
des Wettbewerbes beträchtlich. 


Geschmälert wird das Spielver- 
gnügen lediglich durch die Un- 
übersichtlichkeit des Spielfeldes 
und den mageren Sound. „Shang- 
hai“ ist etwas für alle, die Zeit zum 
Nachdenken haben und bereit 
sind, diese in ein solches Spiel zu 
investieren. Machen Sie sich ans 
Werk — zehn verschiedene Pyra- 
miden warten darauf, abgebaut zu 
werden. 
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Programmname: Shanghai 
Or iu, Eh 
Idee/Story: 
Graphik: 
Sound: 
Schwierigkeitsgrad: 
Spielspaß: 


Spieltyp: Denkspiel 

Spielerzahl: nicht begrenzt 
Besonderheiten: chin. Brettspiel 
Hersteller: Activision 

Preis: (Disk) 59.— 

Vertrieb: Activision/Äriolasoft 
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Spiele 


Schwieriges 
Hüpfen dureh 
hundert Räume 


Daß altbewährte Konzepte mit der 
Zeit keineswegs langweilig wer- 
den müssen, beweist American 
Action mit „Captured“, das nach 
dem Strickmuster der Plattform- 
spiele aufgebaut ist. „Soldier 
One" erwacht in einer unbekann- 
ten Umgebung, Sein Hinterkopf 
schmerzt und er hat Blut an den 
Händen. Er weiß weder, wo er ist, 
noch wie er hierher gekommen 
ist. Kein Wunder also, wenn er 
sich erstmal umschaut, vorausge- 
setzt natürlich, Sie unterstützen ihn 
am Joystick. Das ist allerdings kei- 
ne leichte Aufgabe, immerhin 
geht die gefahrvolle Reise durch 
mehr als hundert Bildschirme. 
Von einem Treppchen zum ande- 
ren hüpfend und springend 
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durchquert man die grafisch aus- 
gezeichneten Spielfelder. Die sich 
bewegenden Hindernisse, die 
den Helden bei Berührung zer- 
bröseln, sind ausgeprochen origi- 
nell und vielgestaltig. Unter ande- 
rem tauchen Würfel, Kreisel, Ro- 
boter oder Dampframmen auf. Her- 
vorragend ist die flüssige Sprite- 
animation der Spielfigur. Einziger 
Abstrich an der Grafik: Unser Sol- 
dier One kann anscheinend selbst 
dann noch strammstehen, wenn er 
über dem Abgrund schwebt und 
nur mit den Zehenspitzen die Platt- 
form neben sich berührt. Das 
Spiel erfordert nicht nur zur Mei- 
sterung der Hindernisse viel Ge- 
schicklichkeit. Bomben, die man 
aufsammelt, um damit bei Zün- 
dung die lästigsten Feinde ver- 
schwinden zu lassen, liegen an 
schwer zugänglichen Stellen. 
Nicht gerade erleichtert wird ei- 


Tolle Grafik ge- 


mischt mit gutem 
Sound erhöht 


den Spielspaß 


era 


nem die Sache durch die etwas 
gewöhnungsbedürftige Joystick- 
steuerung. Es ist nicht möglich, mit 
dem Knüppel nach Belieben „her- 
umzurühren" und ihn beispiels- 
weise direkt von rechts nach oben 
zu ziehen. Damit die Spielfigur der 
Bewegung auch folgt, muß der 
Joystick vorher noch in der Aus- 
gangsstellung gewesen sein. In 
der Hitze des Gefechts passieren 
da schon mal verhängnisvolle 
Fehlsprünge in die falsche Rich- 
tung. Trotz oder vielleicht sogar 
wegen solcher hohen Anforderun- 
gen ist „Captured" ein Spiel, an 
dem man dranbleibt, um weiterzu- 
kommen. Der sehr gute Eindruck 
durch tolle Grafik und hohe Spiel- 
motivation wird abgerundet durch 
den Sound. Er gehört sicherlich 
zum Besten, was dem Soundchip 
des C64 bisher entlockt worden 
ist. 


Programmname: Captured 
STR TENAyn. 

Idee/Story: 

Grafik: 

Sound: 

Schwierigkeitsgrad: 


Spielspaß: 


Spieleranzahl: | 


Spieltyp: Plattformhüpfen 
Besonderheiten: — 

Hersteller: American Action AB 
Preis: k. A. 

Händler: Ariolasoft 


Kampf im All 


Eine wilde Story bildet den Hinter- 
grund des Actionspiels „Hope- 
less" von Radarsoft. Dem Helden 
der Geschichte, Al „Dutch Meat" 
Bluntz, wurde die Geliebte ge- 
raubt. Entführt von Manic Munk, 
einem der meistgesuchten Krimi- 
nellen im Weltall, befindet sie sich 
nun in seinem Sonnensystem mit 
dem schönen deutschen Namen 
Neu Bonn. Das Ziel des Spiels ist, 
Al Bluntz zu helfen, seine Jane wie- 
derzubekommen. Der Bildschirm 
ist dabei gesplittet in ein Kontroll- 
pult und das eigentliche Spielfeld. 
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Darin bewegen Sie sich durch 
Räume, in denen ab und zu Com- 
puterterminals stehen. Jedes die- 
ser Terminals hat eine bestimmte 
Funktion, etwa einen Kompaßbild- 
schirm und einen Lageplan einzu- 
blenden, weitere Türen zu öffnen 
oder wieder Energie und Treib- 
stoff nachzuladen. Zwölf verschie- 
dene Feinde sind beim Lösen der 
Aufgabe hinderlich. Die Gegner 
haben unterschiedliche Eigen- 
schaften und werden durch je- 
weils geeignete Verteidigungs- 
methoden bekämpft. Mit der F3- 
Taste wird zwischen Abwehr- 
schild, Laserkanone und Karate- 


schlägen umgeschaltet. 

Die Bewegungsart kann mit der 
F1-Taste von Laufen zu Fliegen ge- 
ändert werden. Das gleichzeitige 
Bedienen von Joystick und Tasta- 
tur wirkt sich ungünstig auf die 
Handhabung aus, weil man für je- 
den Gegner eine andere Kampf- 
art wählen muß. Überhaupt ist die 
Vielzahl von Kombinationen aus 
Bewegung, Kampfmodus und 
Gegner für den Änfänger ein we- 
nig unübersichtlich. Die Grafik ist 
recht gut, aber nicht umwerfend. 
Spiel- und Lagepläne reichen an- 
geblich über 2000 Bildschirme, 
ändern sich aber im Aufbau 
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Spiele 


kaum. Am Anfang und beim Ein- 
loggen in den Lageplan ertönt 
eine flotte Melodie, der Rest des 
Spiels beschränkt sich leider auf 
— wenn auch gute — Geräuschef- 
fekte. Noch ein Wort zur beigefüg- 
ten Anleitung. Sie erklärt zwar 
ausführlich das Kontrollpult, die 
Eigenschaften der Feinde und die 
Arten der Fortbewegung, sprach- 


REN. 


lich ist sie aber eine Zumutung. Of- 
fensichtlich wurde sie mit Hilfe ei- 
nes Wörterbuchs Wort für Wort 
aus dem Englischen übertragen. 
Das Ergebnis ist ein holpriges 
Deutsch, das an vielen Stellen ei- 
ner gewissen Komik nicht ent- 
behrt, etwa wenn von „umwelt- 
freundlichen Karateschlägen" die 
Rede ist. Anderswo wird die An- 
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AlBlunz auf der 
Suche nach sei- 
ner Geliebten 
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leitung aber aufgrund von Über- 
setzungsfehlern schlichtweg un- 
verständlich. Oder können Sie 
sich etwas unter „geschmackvol- 
len Gegnern" oder einer „Entmas- 
kerung“ vorstellen? Es wird Zeit, 
daß die Softwarefirmen, die ja 
schließlich Geld für ihre Produkte 
verlangen, solche ärgerlichen 
Schlampereien vermeiden. 


Programmname: Hopeless 
0 l 

Idee/Story: 

Grafik: 

Sound: 

Schwierigkeitsgrad: 

Spielspaß: 

Spieleranzahl: 1 

Spieltyp: Actionspiel 

Besonderheiten: — 

Hersteller: Radarsoft 

Preis: k. A. 

Händler: Ariolasoft 


Paperboy 


Wichtigstes Ziel im Zeitungsge- 
werbe ist es, möglichst viel Papier 
zu verkaufen. Dazu gehört, daß 
man Neuigkeiten als erster an den 
Mann bringen kann. 

Der „Paperboy“ ist mit der Vertei- 
lung der Zeitungen betraut. Er ra- 
delt mit seinem BMX-Racer all- 
morgentlich die Straßen entlang 
und plaziert die „Daily Sun“ in die 
Hausbriefkästen. Für jeden „Tref- 
fer" gibt es 250 Punkte. Schafft es 
der ‘Paperboy’ alle in der Straße 
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wohnenden Kunden zu beliefern, 
gewinnt er neue Abonnenten 
hinzu. Ärger gibt es, wenn die Zei- 
tung durch ein geschlossenes 
Fenster fliegt, oder an zwei aufein- 
anderfolgenden Tagen nicht ge- 
liefert wird. Diesen Kunden ist 
man los. 

Die Tour gleicht einer Slalomfahrt 
zwischen Fußgängern, Skate- 
boardfahrern, Hunden, Autos und 
Motorrädern. Täglich kommen 
neue Hindernisse hinzu. Wer sich 
erfolgreich durchschlängelt, kann 
am Ende jeder Tour auf einer Hin- 


Hindernisse war- 
ten überall auf 
den Zeitungsjun- 
gen 


dernisstrecke Bonuspunkte sam- 
meln. 

Die bereits im Oktober auf der 
PCW in London vorgestellte 
Demo-Version für den Spectrum 
weicht von der jetzt vorliegenden 
Commodore 64-Version erheblich 
ab. Neu sind die gute Titelmusic 
und die erheblich verbesserte 
Graphik. Zwar mangelt es immer 
noch ein wenig an Farbe, aber ins- 
gesamt ist die Umsetzung dieses 
Spielhallenhits gelungen. 
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Programmname: Paperbo 
0 l 2 

Idee/Story: 

Graphik: 

Sound: 

Schwierigkeitsgrad: 

Spielspaß: 


Spieltyp: 
Geschicklichkeitsspiel 


Spielerzahl: | 
Besonderheiten: Spielhallenhit 


Hersteller: Elite 
Preis. k. A. 
Vertrieb: k.A. 


Fernsehwettkampf 
im Computer 


„It's a knockout“ ist der englische 
Titel des Fernsehspektakels 
„Spiel ohne Grenzen“. Nachdem 
die ARD bereits vor vier Jahren 
aus diesem Wettbewerb ausge- 
stiegen ist, kommt er in Form eines 
Computerspieles auf die heimi- 
schen Bildschirme zurück. Bis zu 
sechs Spieler treten gegeneinan- 
der an. In der Reihenfolge der 
Plazierung werden pro Disziplin 
ein bis sechs Punkte vergeben. 
Zwischen den Runden gibt es den 
sogenannten Marathon — jeder 
Teilnehmer muß separat antreten. 
Die erste Disziplin ist das „Pfan- 
nenkuchenschleudern‘. Der Teil- 
nehmer versucht, die von den 
Mannschaften hochgeworfenen 


= 


FRGFTE a2: | 


r \ . . 
17 Arerrn 


Pfannenkuchen aufzufangen und 
in einem Behälter zu stapeln. Es 
folgt „Harlem Hoppers" — über 
den Höcker eines Dromedars 
werden Bälle gerollt. Der an einer 
elastischen Leine hängende Spie- 
ler versucht die Bälle aufzufan- 
gen. Als nächstes springt eine jun- 
ge Dame vom Hochseil ins Was- 
ser. Jedesmal, wenn sie dabei in 
einem Rettungsring landet, gibt es 
Punkte. Sport macht hungrig. In 
der vierten Disziplin können sich 
die als Strauße verkleideten Ath- 
leten mit Regenwürmern stärken, 
die sie vom Boden aufpicken. Die 
fünfte (und letzte) Disziplin besteht 
aus einem etwas merkwürdigen 
Hindernislauf. Über Bälle, Teppi- 
che und Hürden hinweg gilt es, 
möglichst viele Meter zurückzule- 
gen, bevor die Zeit zu Ende ist. 


Spiel ohne Gren- 
zen“ in den Com- 


Duter geholt 


Ein hardwareerfahrener 


ser 


wird gesucht. 
Er soll einem Kollegen beratend zur Seite stehen. Interessenten schreiben an: 


CW-Publikationen 
Redaktion RUN 
Postfach 40 04 29 
8000 München 40 
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Nach der Auswertung des Zwi- 
schenspieles — der Teilnehmer 
versucht mittels eines an einem 
Kran befestigten Gewichtes mög- 
lichst viele gegnerische Köpfe 
plattzudrücken — erscheint die 
Abschlußtabelle. Es ertönt die Na- 
tionalhymne des Landes, dessen 
Athleten diese Strapazen am erfolg- 
reichsten überstanden haben; 
und das ganze Spektakel beginnt 
erneut. Es ist sicher eine witzige 
Idee, aus dem Fernsehmatch ein 
Computerspiel zu machen. Die 
Umsetzung leidet aber unter der 
mittelmäßigen Grafik. Die Musik 
ist Durchschnitt und entspricht da- 
mit dem Gesamteindruck des Pro- 
grammes. So richtig Spaß macht 
„It's a knockout“ erst, wenn man 
es mindestens zu dritt spielt. 
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Schwierigkeitsgrad: 
Spielspaß: 

Spieltyp: Sportspiel 
Spielerzahl: bis 6 
Besonderheit: 
Hersteller: Ocean 
Preis: k. A. 
Vertrieb: k. A. 
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E16, E16, Plus4 


Wie der Phoenix aus der Asche eroberten die längst totge- 
glaubten C16-Rechner im vergangenen Jahr den Markt. Un- 
ser großer C16-, C116- und Plus4-Sonderteil bringt eine aus- 
führliche Software-Marktübersicht sowie eine Superbauan- 
leitung: 256-KRAM-Erweiterung für den Plus4. 


Der Drucker mit 24 Nadeln 


Drucker gibt es in Hülle und Fülle. Das Angebot ist 
größer denn je. Im Heimbereich haben sich vor al- 
lem Nadeldrucker etabliert. Sie bringen jedes 
Zeichen zu Papier. Einziger Nachteil: Preiswerte Na- 
deldrucker müssen, um gute Schriftqualität zu errei- 
chen, jede Zeile doppelt drucken (NLQ). Für etwa 
1200 Mark gibt es jetzt den 24-Nadel-Drucker SL-80AI 
von Seikosha. Er besticht durch ein hervorragendes 
Schriftbild. Ausführlicher Testbericht in der nächsten 
Ausgabe. 
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_Spielneuheiten für den co. 
abe FETTE BETT E 
Das Weihnachtsgeschäft hat den Commeione Ca 
putern eine reiche Bescherung an neuen Spielen be- 
reitet. Unter anderem finden Sie in der nächsten Aus- 
gabe Berichte über: Peter Shiltons „Handball Mara- 
dona“, „Airline“ und „Magic Marbles“ von AriolaSoft, 
„Spinky Harold“ von Firebird und vieles mehr. 


REEL PADREETN EI | 
„Defender of the Crown" heißt das Zauberwort für 
den Amiga, das hervorragende Grafiken mit ge- 
lungener Animation auf dem Bildschirm erscheinen 
läßt. Fast ist in diesem Programm das Spiel „Verpak- 
kung“ für die Grafik, und nicht umgekehrt. Sollte 
„Defender of the Crown“ einen neuen Standard für 
Spiele setzen, blicken Amigabesitzer einer rosigen 
Zukunft entgegen. 
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Online with the trend. 
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RUSHWARE Produkte erhalten 

Sie in den Fachabteilungen von Heiet KAuFhOF Quelle KARSTADT 
sowie in allen gutsortierten Computershops und im guten Versandhandel. 
Vertrieb: RUSHWARE - Mitvertrieb: Micro-Händler - Distribution in Österreich: Karasoft 
Vorsicht vor Grauimporten! :* a a en ee 


Am Start 8 Teams aus 4 Ländern. In 4 Etappen 
durch Marlboro Country: 


E 1. Etappe: Mit dem 4-Wheel-Drive durch 
die wilde Kakteenlandschaft Arizonas. 


& 2. Etappe: Umsteigen auf die Motorboote. 
Es wartet das Labyrinth des Lake Powell. 


wi 3. Etappe: Die Sanddünen der San Rafael 
Wüste, die man nur mit den 3 bulligen Reifen 
der Trikes schafft. 


a 4. Etappe: Mit den Pferden auf die Drei- 
tausender Utahs. 


5 Teams ü 2 Personen für Deutschland gesucht. 
Bewerben können sich Einzelpersonen oder 
Zweierteams ab 18 Jahren. 

Unter allen Bewerbern werden 10 Marlboro 
Abenteuer Team-Trikes verlost! 
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